Информатика, опубликовано 2018-08-22 18:13:34 by Гость

Выведите таблицу кубов целых положительных чисел от 1 до 15.

Ответ оставил Гость

// PascalABC.NET 3.2, сборка 1341 от 20.11.2016
begin
  Range(1,15).Tabulate(i->i*i*i).Println(NewLine)
end.

Результат
(1,1)
(2,8)
(3,27)
(4,64)
(5,125)
(6,216)
(7,343)
(8,512)
(9,729)
(10,1000)
(11,1331)
(12,1728)
(13,2197)
(14,2744)
(15,3375)

Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.

Форма вопроса доступна на полной версии этой страницы.