Напечатать полную таблицу сложения в виде: — Pascal(Паскаль)

1+1=2 2+1=3 ... 9+1=10
1+2=3 2+2=4 ... 9+2=11
... ... ... ...
1+9=10 2+9=11 ...9+9=18
Uses
 CRT;
var
 i,j:integer;
begin
ClrScr;
for i:=1 to 9 do
begin
for j:=1 to 9 do
begin
 write(' ',j,'+',i,':=',i+j:2);
end;
writeln;
end;
readkey
end.

Leave a Comment

− 2 = 5