Предмет: Информатика,
автор: рапрмсита
схема к этой программе 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
Блок-схема во вложении. И постарайся писать код с переносом строки.
Приложения:
Похожие вопросы
Предмет: Химия,
автор: NdndnN
Предмет: Математика,
автор: Arina28823
Предмет: Английский язык,
автор: justrjfydmdlys
Предмет: Биология,
автор: nik2201
Предмет: История,
автор: ЯркаяЗвёздочка