Напишите программу печатающую на экране заданное число и пять последующих четных чисел. В качестве входных данных допускается задавать число от 1 до 1000 Пример:
Число: 9
9
10
12
14
16
18

Question

Информатика: Напишите программу печатающую на экране заданное число и пять последующих четных чисел. В качестве входных данных допускается задавать число от 1 до 1000 Пример: Число: 9 9 10 12 14 16 18

GylenkoSasha · Accepted Answer

1. Ряд строится по принципу золотого сечения. Формула для вычисления члена последовательности такая:
x(2)=x(1)+1,
x(3)=x(2)+2,
...
x(n)=x(n-1)+n-1

В нашем алгоритме для вычисления следующего члена последовательности будем запоминать текущий член последовательности в переменной kp.
Затем получаем очередной член последовательности суммируя kp и переменную цикла i - 1. Делаем вычисления, выводим на экран и переписываем переменную kp новым значением.

var i,k,kp:integer;
begin
kp:=1;
for i:=1 to 10 do begin
k:=kp+i-1;
kp:=k;
writeln(k:5, k*k:6, k*k*k:8);
end;
end.

MOGZ ответил