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​

UzZzeR UzZzeR    3   07.02.2020 22:59    5

Ответы
matsunichivan matsunichivan  11.10.2020 04:09

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

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика