ТутРешу.Ру

Составить программу, заполняющую массив из 10 элементов…

Задание:

Составить программу, заполняющую массив из 10 элементов, с числовой последовательностью 2,3,5,9,17…

Решение:

Написано на Pascal: Program ArraySequence; Var a: Array [1… 10] Of Integer; i: Integer; Begina[0]: =2; For i: =1 To 9 Doa[i]: =2*a[i-1] — 1; For i: =0 To 9 DoWrite (a[i], '); ReadLn; End.




Знаете другой ответ?

Отправить свой ответ