Вопрос по информатике:
ПАСКАЛЬ..Заполнить массив из 20 элементов числами Фибоначчи и вывести результат на экран.
- 08.12.2017 14:08
- Информатика
- remove_red_eye 7020
- thumb_up 6
Ответы и объяснения 1
Var ar:array[1..20]of integer;
a,b,c,i: integer;
begin
a := 0;
ar[1]:=a;
b := 1;
ar[2]:=b;
for i:=3 to 20 do begin
ar[i]:=a+b;
c := b;
b := a + b;
a := c; end;
for i:=1 to 20 do write(ar[i],' ');
end.
- 09.12.2017 03:50
- thumb_up 11
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.