Предмет: Информатика, автор: aaserg02

ПОМОГИТЕ записать программу нахождения суммы 10 натуральных чисел введенных с клавиатуры с помощью цикла с заданным количеством повторением и заданным условием окончания работы (на языке Паскаль)

Ответы

Автор ответа: archery
0
const
    n = 10;

var
    i, a, s: integer;

begin
    for i := 1 to n do
    begin
        read(a);
        s := s + a;
    end;
    
    writeln(s);    
end.
Похожие вопросы
Предмет: Информатика, автор: Аноним