Написать программу, которая запрашивает целое число и выводит на экран таблицу умножения на это число от 1 до 10. Pascal ABC
Ответы
Ответ дал:
0
program umn;
var
n, i: Integer;
begin
Write('Введите число: ');
readln(n);
for i := 1 to 10 do
Write(n, '*', i, '=', n * i, #10);
end.
var
n, i: Integer;
begin
Write('Введите число: ');
readln(n);
for i := 1 to 10 do
Write(n, '*', i, '=', n * i, #10);
end.
Похожие вопросы
2 года назад
2 года назад
2 года назад
2 года назад
8 лет назад
8 лет назад
9 лет назад
9 лет назад