Составьте блок-схему к следующей программе: program n_9; var a:array [1..50] of integer; i,k:integer; begin for i:=1 to 50 do a[i]:=random (51) + 150; for i:=1 to 50 do writeln (a[i]); k:=0; for i:= 1 to 50 do if a[i] больше =...
Составьте блок-схему к следующей программе:
program n_9;
var
a:array [1..50] of integer;
i,k:integer;
begin
for i:=1 to 50 do
a[i]:=random (51) + 150;
for i:=1 to 50 do
writeln (a[i]);
k:=0;
for i:= 1 to 50 do
if a[i]>= 170 then k:=k +1;
writeln('k=',k);
end.
Гость
Ответ(ы) на вопрос:
ГостьСм. фото.......................................
Не нашли ответ?
Похожие вопросы