Составьте программу ввода массива s [1..8] с клавиатуры и вывода элементов больше 5.
Составьте программу ввода массива s [1..8] с клавиатуры и вывода элементов больше 5.
Ответ(ы) на вопрос:
var a : array [1..8] of byte;
begin for var i := 1 to 8 do begin
write(i, ':'); readln(a[i]);
end;
for var i := 1 to 8 do
if a[i] > 5 then writeln(a[i]);
end.
Не нашли ответ?
Похожие вопросы