Составить программу для нахождения суммы первых шести чисел.

Question

Информатика

Добромира

5 мая, 09:22

Составить программу для нахождения суммы первых шести чисел.

+3

Ответы (1)

Знаете ответ на вопрос?

Сенюха · Answer 1

Program abc;

Var a, b, c, d, e, f, x:integer;

Begin

Writeln ('Введите числа') ;

Readln (a, b, c, d, e, f) ;

X:=a+b;

X:=x+c;

X:=x+d;

X:=x+e;

X:=x+f;

Writeln (x) ;

End.