Дано натуральное n действительные а1 аn (а энное) получить а1а2+-1an в паскале заранее !
217
464
Ответы на вопрос:
vara: array[1..500] of integer; i,k,n: integer; begink: =0; write('n= '); readln(n); for i: =1 to n do readln(a[i]); for i: =1 to n do k: =k+a[i]*a[i+1]; writeln(k); end.
Популярно: Информатика
-
Spez1813.09.2022 03:37
-
lexa2307200328.08.2021 13:51
-
Сателла119.08.2022 04:20
-
HKTOG29.09.2021 16:13
-
gonigh04.06.2022 05:12
-
никич4304.12.2021 18:02
-
lizasolnce200414.07.2020 21:13
-
ABBADON36916.07.2022 17:09
-
ezek529.03.2021 04:08
-
GremMaster23.11.2021 10:08