Если в Паскале, и первый пример всё же 1x2, то такая программа:
var
a,b: integer;
begin
a := 1;
b := 2;
while a<=9 do
writeln(a,'x',b,'=',a*b);
a := a + 1;
end;
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Если в Паскале, и первый пример всё же 1x2, то такая программа:
var
a,b: integer;
begin
a := 1;
b := 2;
while a<=9 do
begin
writeln(a,'x',b,'=',a*b);
a := a + 1;
end;
end.