1)
begin
for var i := 1 to 10 do begin
var ch := i*2;
Writeln(i,'*2=',ch);
end;
end.
2)
for var i := 1 to 9 do begin
var ch := i*i;
Writeln(i,'*',i,'=',ch);
end
1)
begin
for var i := 1 to 10 do begin
var ch := i*2;
Writeln(i,'*2=',ch);
end;
end.
2)
begin
for var i := 1 to 9 do begin
var ch := i*i;
Writeln(i,'*',i,'=',ch);
end;
end