
Laimgepad
4 год назад
Напишите программу, которая выводит на экран таблицу умножения на n ( n-целое число в диапазоне от 2 до 10, вводимое с клавиатуры)
ОТВЕТЫ

Валентина
Oct 24, 2020
//PascalABC.Net 3.2
begin
var n:=readinteger('Введите n: ');
for var i:=1 to n do
begin
for var j:=1 to n do write (i*j:2, ' ');
writeln;
end;
end.
begin
var n:=readinteger('Введите n: ');
for var i:=1 to n do
begin
for var j:=1 to n do write (i*j:2, ' ');
writeln;
end;
end.
21
Смежные вопросы: