Question

Срочно!!!!!!
Pascal ABC
a) составьте программу выводящую на экран фрагмент таблицы умножения :
1*2=2
2*2=4
3*2=6
9*2=18
б) Составьте программу выводящую на экран фрагмент таблицы умножения:
1*1=1
2*2=4
3*3=9
9*9=81​

Answer 1

Ответ:

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