Напечатать таблицу умножения в паскале для чисел 15,16…

Question

Напечатать таблицу умножения в паскале для чисел 15,16,17 и расположиить в несколькостолбцов.

Answer 1

35

bukht

26 февраля 2023

Program Tablica; Var n: Integer; i: Integer; Begin n: =15; for i: =1 to 17 do begin Write (n, '*', i, '=', n*i, '); Write (n+1, '*', i, '=', (n+1)*i, '); WriteLn (n+2, '*', i, '=', (n+2)*i); end; ReadLn; End.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: