S:=0; a:=5; for i:=1 to 10 do begin s:=s+i; if s больше 20 then s:=s+a; else a:=a+i; s:=s+1; end; write (s) write (i)
S:=0;
a:=5;
for i:=1 to 10 do
begin
s:=s+i;
if s>20 then s:=s+a;
else a:=a+i;
s:=s+1;
end;
write (s)
write (i)
Ответ(ы) на вопрос:
s=165 i=10..........................................
Не нашли ответ?
Похожие вопросы