Дан массив из 6 целых чисел. Умножить все отрицательные числа на 5. Вывести элементы массива.
Дан массив из 6 целых чисел. Умножить все отрицательные числа на 5. Вывести элементы массива.
Гость
Ответ(ы) на вопрос:
ГостьProgram n1;
const n=6;
var a: array [1..n] of integer;
i: integer;
begin
for i:=1 to n do
begin
readln(a[i]);
if a[i]<0 then a[i]:=a[i]*5;
end;
for i:=1 to n do writeln(a[i]);
end.
Не нашли ответ?
Похожие вопросы