Предмет: Информатика,
автор: рапрмсита
схема к этой программе Program n_1; Var A: array[1..50] of integer; i,k:integer; begin for i:= 1 to 50 do a[i]:= random(51)+150; k:=0; for i:= 1 to 50 do if a[i]>170 then k:=k+1; writeln(k); end.
Ответы
Автор ответа:
0
Блок-схема во вложении. И постарайся писать код с переносом строки.
Приложения:
Похожие вопросы
Предмет: Русский язык,
автор: Wyoming09
Предмет: Английский язык,
автор: namandykov
Предмет: Русский язык,
автор: Аноним
Предмет: Биология,
автор: nik2201
Предмет: История,
автор: ЯркаяЗвёздочка