Дано натуральное n действительные а1 аn (а энное) получить а1а2+-1an в паскале заранее !
zak8rbayramovp0akso
2
01.03.2019 10:40
1
Другие вопросы по теме Информатика
шахноза31
16.04.2020 21:25
nikolayy220502
16.04.2020 20:59
markelovakristi
09.06.2019 00:28
polishululyana
09.06.2019 00:04
маша9393
09.06.2019 02:50
VarLen20005
10.11.2020 20:08
sestrichkitv
19.05.2019 18:10
regenko1
19.05.2019 18:10
svfedunina
19.05.2019 18:10
Популярные вопросы
- Умные вещи главные и второстепенные герои...
1 - Розберіть за членами речення, Речення...Хочу тобі сказати, моя...
1 - Жоғарыда оқыған мәтінге жаңа кейіпкерлер немесе оқиғалар қосып...
3 - 1 общий во специальный, 1 альтернативный и 1 разделительный во...
3 - ответьте письменно на во васюткено озеро: 1.Назовите запомнившиеся...
2 - Составить рассказ про путешествие по Звёздным и ставить себя...
3 - Р.Гамзатов – өз елінің нағыз патриоты. «Жазушы тілінің сөздігі»...
2 - Приход к власти Таукель хана 2. Казахские войска во главе с султаном...
1 - Задание ниже. Решить две задачи...
3 - Представь выражение z88 в виде произведения двух степеней с одинаковыми...
2
var
a:array[1..500] of integer;
i,k,n:integer;
begin
k:=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.