Составьте программу выводящую на экран фрагмент таблицы умножения:
1×1=1
2×2=4
3×2=6
...
9×2=18
С ЦИКЛОМ WHILE!!!!! ОЧЕНЬ ВАЖНО!!!!! FOR не пойдет!!!!!!!!!

Если в Паскале, и первый пример всё же 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.