Регистрация
байгинат1
24.02.2022 05:50
Информатика
Есть ответ 👍

От разведчика была получена следующая радиограмма, переданная с использованием азбуки морзе

298
493
Посмотреть ответы 1

Ответы на вопрос:

пухля13
пухля13
4,8(57 оценок)

a[1] : = 1;

a[2] : = 1;

i : = 3;

sum : = 0;

 

while (a[i] < 1000) do

  begin

    a[i] : = a[i - 1] + a[i - 2];

    inc(i);

end;

 

for j : = 1 to i do

  sum : = sum + a[i];

 

write(sum);  

Популярно: Информатика