На каждом следующем дне рождении Винни съедает столько же меда, сколько съел на двух предыдущих вместе. На двух первых днях рождения у пяточка и кролика он съел по 0,1 кг меда. Определить, сколько кг меда он съест на десятом дне рождении.

Программа должна быть написана с помощью цикла в паскале.

Question

Килина

3 августа, 18:24

+1

Ответы (1)

Знаете ответ на вопрос?

Венюля · Answer 1

Var

i:integer;

s, p, p1:real;

begin

p:=0.1;

p1:=0.1;

for i:=3 to 10 do

begin

s:=p1+p;

p1:=p;

p:=s;

end;

writeln ('Ответ: ', s) ;

end.