Составить программу которая вычисляет сумму первых 161 естественных чисел (параметром цикла

Составить программку которая вычисляет сумму первых 161 естественных чисел (параметром цикла является переменная J,а сумма хранится в переменной M)

Задать свой вопрос
1 ответ
Var
  j,m:integer;

begin
  m:=0;
  for j:=1 to 161 do m:=m+j;
  Writeln(m)
end.

Итог
13041
Мартысюк Геннадий
помоги решить еще одно задние
Эмилия Локаткина
Это заместо спасибо? Поначалу научитесь простой воспитанности.
Никита Гимельфарб
Оправдываюсь за свою невежливость
Леонид Солесинов
спасибо огромное за решение
София Подчекова
помогите пожалуйста решить еще одно задание
Оленька Заволоко
Достаточно просто не забывать щелкать сердечко.
Виталя Стоцков
ок
Алексей Китари-Оглы
я 1-ый раз
Елизавета Чамурова
не разрбрался еще
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт