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

crybaby1916 crybaby1916    1   23.08.2019 01:40    0

Ответы
ssarahiss ssarahiss  31.08.2020 20:02
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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика