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

Question

Информатика

Христюха

29 января, 08:23

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

+1

Ответы (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.