Напишите Паскаль-программу для нахождения суммы 10 произвольных чисел введенных с клавиатуры,чтобы компьютер вводил число.

Предыдущий
вопрос Следующий
вопрос

program SumOfNumbers;

var
sum, number, i: integer;

begin
sum := 0;

for i := 1 to 10 do
begin
writeln('Enter a number: ');
readln(number);
sum := sum + number;
end;

writeln('The sum of the 10 numbers is: ', sum);

end.