Составить программу которая выводит таблицу умножение ** любое число 8 класс

Question

Составить программу которая выводит таблицу умножение на любое число
8 класс

Comments

В смысле??? Пример в студию!

Answer 1

Var
   A:real;
   i:byte;
Begin
Write('Введите число: ');
ReadLn(A);
For i:= 1 to 9 do
    WriteLn(A,'*',i,' = ',A*i);
End.