Предмет: Информатика,
автор: КираЛи
С клавиатуры вводится n чисел. Найти сумму чисел умноженных на 2 (Паскаль)
Ответы
Автор ответа:
0
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.
Интересные вопросы
Предмет: Музыка,
автор: kirillkafish3
Предмет: Математика,
автор: smoktunovicmihail
Предмет: География,
автор: cutegirl34
Предмет: Алгебра,
автор: SlavaGeneral
Предмет: Геометрия,
автор: dfhufv