Задача на паскали. Построить последовательность из чисел Фибоначчи до N-го элемента. Этот параметр (кол-во элементов) задается с экрана. Реализовываем ее НЕРАЦИОНАЛЬНО!, БЕЗ ПРОЦЕДУР! Последовательность нужно записать как: fib0 = 1 fib1 = 1 fibn = fibn-1 + fibn-2 100 БАЛЛОВ

Вопрос школьника по предмету Другие предметы

Задача на паскали. Построить последовательность из чисел Фибоначчи до N-го элемента.

Этот параметр (кол-во элементов) задается с экрана. Реализовываем ее НЕРАЦИОНАЛЬНО!, БЕЗ ПРОЦЕДУР!
Последовательность нужно записать как:
fib0 = 1
fib1 = 1
fibn = fibn-1 + fibn-2
100 БАЛЛОВ

Ответ учителя по предмету Другие предметы

Ответ:

№1 1)2)

var a:array[1..5]of integer;

i:byte;

begin

for i:=1 to 5 do

readln(a[i]);

writeln();

for i:=1 to 5 do

if (a[i]>0) and (a[i]<10) then begin

writeln(a[i]);

end;

end.

Объяснение: