Сделать программу на паскале + блок схему15 .Вычислить : 1+2+3+5+8+13+

Сделать программку на паскале + блок схему
15 .Вычислить : 1+2+3+5+8+13+

Задать свой вопрос
1 ответ
//PascalABC.NET 3.3,сборка 1611 от 06.01.2018

//Внимание! Если программа не работает, обновите версию!

begin

  var x:=readinteger('x=');

  var mas:= new real[x];  mas[0]:=1; mas[1]:=2;

  for var i:=2 to x-1 do

   mas[i]:=mas[i-2]+mas[i-1];

  mas.Println;

  Writeln('Сумма=',mas.Sum)

end.
Колядный Миша
можно блок схему?
Степка Кисткин
все добавил !
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт