Нужна блок схема к следующим алгоритмам на паскаль школьная работа срочно!!!!4. vari:longint;beginfor i:=100 to 999 doif (i mod 7)=0 then writeln(i);end.5.vari,s:longint;begins:=0;for i:=100 to 999 doif (i mod 13)=0 then s:=s+i...
Нужна блок схема к следующим алгоритмам на паскаль школьная работа срочно!!!!
4. var
i:longint;
begin
for i:=100 to 999 do
if (i mod 7)=0 then writeln(i);
end.5.var
i,s:longint;
begin
s:=0;
for i:=100 to 999 do
if (i mod 13)=0 then s:=s+i;
writeln(s);
end.6. var
i,k:longint;
begin
k:=2;
for i:=1 to 10 do
begin
writeln('2 в степени ',i,'=',k);
k:=k*2;
end;
end.
Гость
Ответ(ы) на вопрос:
Не нашли ответ?
Похожие вопросы