Составить программу, которая выводит таблицу квадратов и кубов натуральных чисел от 1 до 15.

Составить программу, которая выводит таблицу квадратов и кубов натуральных чисел от 1 до 15.
Гость
Ответ(ы) на вопрос:
Гость
// PascalABC.NET 3.2, сборка 1383 от 09.02.2017 // Внимание! Если программа не работает, обновите версию! begin   Range(1,15).Select(i->Format('{0,2}{1,6}{1,6}',i,i*i,i*i*i)).Println(NewLine) end. Результат  1     1     1  2     4     4  3     9     9  4    16    16  5    25    25  6    36    36  7    49    49  8    64    64  9    81    81 10   100   100 11   121   121 12   144   144 13   169   169 14   196   196 15   225   225
Не нашли ответ?
Ответить на вопрос
Похожие вопросы