Вычислить сумму 10 чисел введённых с клавиатуры (на паскале). Заранее спасибо.
More Questions From This User See All
Вычислить сумму 10 чисел введённых с клавиатуры (на паскале). Заранее спасибо.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
var i,sum,x:integer;
begin
for i:=1 to 10 do
begin
read(x);
sum:=sum+x;
end;
writeln(sum);
end.
uses crt;
var i,sum,x:integer;
begin
clrscr
for i:=1 to 10 do
begin
read(x);
sum:=sum+x;
end;
writeln('сумма ');
end.