Скласти алгоритм вивведення перших N (водиться з клавіатури) Чисел Фібоначі 1,1,2,3,5,8,13,21 Lazarus
116
230
Ответы на вопрос:
Program enot; var p,m: array[1..5] of integer; i: integer; begin for i: = 1 to 5 do p[i]: = random (11)-5; for i: = 1 to 5 do if p[i] mod 2 =0 then m[i]: =i*p[i] else m[i]: =-p[i]; for i: = 1 to 5 do write(m[i]: 4); end.
Популярно: Информатика
-
irinar118.04.2021 05:45
-
E200626.08.2021 06:10
-
клубничка12501.09.2022 18:05
-
badurina92p0cc4904.03.2020 11:15
-
vapapsroyflmq19.04.2020 19:52
-
sveta0501117.06.2020 21:57
-
Жыгаа26.11.2021 05:19
-
akaspiyskaya24.07.2022 20:54
-
leratyurina21.09.2021 22:04
-
miirko77717.03.2021 23:48