Question

Помогите!!!!!!Даю 50 баллов!!!!

Написать программу, которая найдет сумму первых 50 натуральных чисел

Answer 1

Ответ:

program Chernovik;

var i,s: integer;

begin

s:=0;

for i:=1 to 50 do

s:=s+i;

write(s)

end.

Объяснение:

В цикле суммируются числа от 1 до 50

Вывод переменной s (суммы)