Склавиатуры ввести 10 целых чисел и вывести в строчку все числа большие 5.

ruslankalita746rusan ruslankalita746rusan    3   14.09.2019 09:30    1

Ответы
elenafrolova31 elenafrolova31  07.10.2020 13:56
Program N1;var a: array [1..10] of integer;i:integer;beginfor i:= 1 to 10 doreadln(a[i]);for i:=1 to 10 do beginif a[i]>5 thenwrite (a[i]);end;end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика

Популярные вопросы