Склавиатуры вводится n чисел. найти сумму чисел умноженных на 2 (паскаль)
Шнуров
1
04.10.2019 23:30
0
Другие вопросы по теме Информатика
врондао
08.09.2019 06:30
csioucfuo
30.09.2019 20:30
546546YGygY
30.09.2019 20:30
vladpasin34
30.09.2019 20:30
ANNAAFANASYEVA1
29.06.2019 11:20
Kurbatovaolga15
29.06.2019 11:20
xrot
29.06.2019 11:20
Ksu576
07.12.2021 15:16
Популярные вопросы
- 15 найдите наименьшее целое число, удовлетворяющее неравенству: 1)(х-8)(х+8)больше...
3 - Y=2x-5-линейная функция,проходит ли она через точку a(10; 7)...
2 - Вмагазин завезли 360 кг сахара за 1 день продано 25 % сахара . сколько кг...
2 - Найдите периметр прямоугольника со сторонами 3,7 дм и 2,15 дм....
3 - 1) выражение: m^2-2m/3 : m/2 ; при m=5 2)найдите меньший корень уравнения:...
1 - Какое слово образовано приставлено суффиксальным обогреватель 2)безрезультатный...
3 - Россия накануне первой мировой войны( социально- положение)...
2 - Кислород о2 массой 64г нагрели на 50с при постоянном объёме. количество...
2 - Прочитай стихотворение в одной стране в чудной стране где не бывает тебе...
3 - ответьте на вопрос: что такое ритуал?...
1
Var a,b,n,i:integer;
begin
read (n);
b:=0;
For i:=1 to n do begin
read (a);
b:=b+a*2;
end;
Writeln (b);
end.