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)
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)
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments