1. 

   Иван Малигон New Member

   Задан массив чисел. Замените каждое число суммой двух предыдущих.

    

   Иван Малигон, 27 янв 2010

   #1
2. 

   antoniego New Member

   const n=5;
   var a:array [1..n] of integer;
   b,i:integer;
   begin
   for i:=1 to n do read(a);
   for i:=3 to n do
   a:=a[i-1]+a[i-2];
   for i:=1 to n do write(a);
   end.
    
   первые 2 числа не берутся так как перед ними нет 2 чисел
   

    

   antoniego, 27 янв 2010

   #2

Ваше имя или e-mail:

Пароль:

Забыли пароль?

Запомнить меня