Вывести квадраты и кубы 10 чисел следующей последовательности

@JulUlibina · Регистрация: 08.11.2010

Студворк — интернет-сервис помощи студентам

Здравствуйте, помогите пожалуйста)

Вывести квадраты и кубы 10 чисел следующей последовательности: 1, 2, 4, 7, 11, 16, …
Пример:
1 1 1
2 4 8
4 16 64
...
46 2116 97336

Заранее спасибо!

@Puporev · 21.01.2011, 08:58

Pascal

uses crt;
var i,j,k:integer;
begin
j:=1;
k:=0;
for i:=1 to 10 do
 begin
  inc(j,k);  //j:=j+k
  writeln(j:2,j*j:5,j*j*j:7);
  inc(k); //k:=k+1
 end;
end.

@JulUlibina 5 / 5 / 0 Регистрация: 08.11.2010 Сообщений: 87
		1
	Вывести квадраты и кубы 10 чисел следующей последовательности 20.01.2011, 21:06. Показов 2264. Ответов 1 Метки нет (Все метки) Здравствуйте, помогите пожалуйста) Вывести квадраты и кубы 10 чисел следующей последовательности: 1, 2, 4, 7, 11, 16, … Пример: 1 1 1 2 4 8 4 16 64 ... 46 2116 97336 Заранее спасибо! 0

Опции темы

Вывести квадраты и кубы 10 чисел следующей последовательности

Решение