Pascal ABC 1)Вычислить и вывести таблицу умножения ** 6 чисел от 1 до 10 Подробно, с...

Question

Pascal ABC
1)Вычислить и вывести таблицу умножения на 6 чисел от 1 до 10
Подробно, с объяснениями пожалуйста ((

Answer 1

Var   i, k : integer; // Для расчета используем целые числа
begin
for k := 1 to 6 do begin  // Берем числа от 1 до 6
  for i := 1 to 10 do begin // Умножаем на числа от 1 до 10
    writeln(k, ' x ', i, ' = ', k * i); // Выводим результат умножения
  end;
  writeln('===');
end;
end.

Comments

Спасибо