Регистрация
emmka1
11.05.2023 22:25
Информатика
Есть ответ 👍

Прошу напишите паскаль ,заранее ))

180
383
Посмотреть ответы 1

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

Pawel10hor
Pawel10hor
4,7(9 оценок)
Program fib; var a: array [0..100] of integer;       i,n: integer;       begin               a[1]: =1;               a[2]: =1;               for i: =3 to 100 do               begin               a[i]: =a[i-1]+a[i-2];                 write('a[',i,']  =  ',a[i],'   ');                 end;       end.         

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