Задача с циклом пока и до:

программа паскаль

Вычислить сумму первых 10 натуральных чисел?

Question

Митрич

30 июля, 19:09

+3

Ответы (1)

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

Каздоя · Answer 1

Var a, x:integer;

begin

a:=0;

while a<=10 do

begin

a:=a+1;

x:=x+a;

end;

writeln (x) ;

end.

Задача с циклом пока и до:программа паскальВычислить сумму первых 10 натуральных чисел?