Вычислить сумму 10 чисел введённых с клавиатуры (на паскале). заранее .

arturyakovlev1703 arturyakovlev1703    2   28.03.2019 02:40    0

Ответы
АлфавитABC АлфавитABC  26.05.2020 20:18

var i,sum,x:integer;

begin

 for i:=1 to 10 do

begin

read(x);

sum:=sum+x;

end;

writeln(sum);

end.

ПОКАЗАТЬ ОТВЕТЫ
Qudipue1 Qudipue1  26.05.2020 20:18

uses crt; 

 

var i,sum,x:integer;

begin

 

clrscr

for i:=1 to 10 do

begin

read(x);

sum:=sum+x;

end;

writeln('сумма ');

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика