Регистрация
NastyaVelikaya2000
05.03.2020 09:29
Информатика
Есть ответ 👍

решить информатику. Там 3 задания, за это.

145
149
Посмотреть ответы 1

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

nstratonova
nstratonova
4,5(50 оценок)
Var n,a,b,c,d,i: integer; begin readln(n); a: =1; b: =1; c: =1; write(a: 2,b: 2,c: 2); for i: =4 to n do   begin   d: =a+b+c;   a: =b;   b: =c;   c: =d;   write(' ',d);   end; end. пример: 15 1 1 1 3 5 9 17 31 57 105 193 355 653 1201 2209

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