a:=100;
i:=0;
while i<8 then
begin
s:=s+a;
a:=a+7;
inc(i);
end;
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
a:=100;
i:=0;
while i<8 then
begin
s:=s+a;
a:=a+7;
inc(i);
end;