1)составьте программу ввода элементов массива а[1..8 ] с клавиатуры и вывода на экран элементов с отрицательными значениями; 2)составьте программу ввода элементов массива b[1..6] с клавиатуры и вывода на экран элементов с полож...
1)составьте программу ввода элементов массива а[1..8 ] с клавиатуры и вывода на экран элементов с отрицательными значениями; 2)составьте программу ввода элементов массива b[1..6] с клавиатуры и вывода на экран элементов с положительными значемиями
Гость
Ответ(ы) на вопрос:
Гостьprogram z1;
var
a:array [1..8] of integer; i: integer;
begin for i:=1 to 8 do read(a[i]); writeln; for i:=1 to 8 do if a[i] < 0 then write (a[i]);
end. program z2;
var
b:array [1..6] of integer; i: integer;
begin for i:=1 to 8 do read(b[i]); writeln; for i:=1 to 8 do if b[i] > 0 then write (b[i]);
end.
Не нашли ответ?
Похожие вопросы