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..........................................

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку
×