Задача на Паскале(нужно полное решение) Задан массив случайным ...
Задача на Паскале(нужно полное решение)Задан массив случайным образом. Преобразовать его след. образом:все отрицательные элементы заменить модулем, положительные удвоить, нулевые заменить числом 10
Есть ответ
17.12.2022
373
Ответ
var A: array [1..100] of integer;
i: integer;
begin
randomize;
for i := 1 to 100 do begin
A[i] := random(200) - 100;
end;
for i := 1 to 100 do begin
if (A[i] < 0) then A[i] := Abs(A[i]);
else if (A[i] > 0) A[i] := A[i] * 2;
else A[i] = 10;
end;
end.
Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
Просто нажмите на кнопку "Подарить".
17.12.2022