вычислить сложения чисел от 1 до 50 используя различные варианты цикла

Вычислить сложения чисел от 1 до 50 используя разные варианты цикла

Задать свой вопрос
1 ответ

На каком языке программирования надо?Pascal?

Если да,то

var summ,i:integer;

begin

for i:=1 to 50 do

begin

 summ+=i;

end;

WriteLn(summ);

end.

Или

var summ,i:integer;

begin

i:=1;

while ilt;=50 do

begin

 summ+=i;

 i+=1;

end;

WriteLn(summ);

end.

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт