1.
var i,s:integer;
begin
s:=0;
i:=1;
while i<=317 do<br> begin
s:=s+i;
i:=i+2;
end;
writeln('s = ',s);
end.
Результат:
s = 25281
2.
var i,j:integer;
begin
for i:=2 to 9 do
begin
for j:=1 to 9 do writeln(i,' * ',j,' = ',i*j);
writeln;
end;
end.
Результат (частично):
2 * 1 = 2
2 * 2 = 4
2 * 3 = 6
2 * 4 = 8
2 * 5 = 10
2 * 6 = 12
2 * 7 = 14
2 * 8 = 16
2 * 9 = 18
...
9 * 1 = 9
9 * 2 = 18
9 * 3 = 27
9 * 4 = 36
9 * 5 = 45
9 * 6 = 54
9 * 7 = 63
9 * 8 = 72
9 * 9 = 81