Опубликовано 5 лет назад по предмету Информатика от Herobrin555555

Напишите программу, которая вычисляет сумму всех отрицательных чисел от 1 до n.

Если можно побыстрее, а то на завтра нужно.

Ответ

Ответ дан Аккаунт удален

// PascalABC.NET 3.1, сборка 1200 от 13.03.2016
begin
Writeln('s=',Range(ReadInteger('n='),-1).Sum)
end.

Тестовое решение:
n= -8
s=-36

"Школьный вариант"

// PascalABC.NET 3.1, сборка 1200 от 13.03.2016
var
i,n,s:integer;
begin
s:=0;
Write('n='); Read(n);
for i:=-1 downto n do s:=s+i;
Writeln('s=',s)
end.
1. Ответ
  
  Ответ дан Аккаунт удален
  
  Я могу Вам написать еще и сугубо школьный вариант. Если надо
2. Ответ
  
  Ответ дан Аккаунт удален
  
  Будет длинно и противно))
3. Ответ
  
  Ответ дан Herobrin555555
  
  Ну если можно то напишите
4. Ответ
  
  Ответ дан Herobrin555555
  
  Спасибо за предоставленную мне помощь.
5. Ответ
  
  Ответ дан Аккаунт удален
  
  Пожалуйста

Самые новые вопросы

Другие предметы - 4 года назад

Сочинение-рассуждение. прочитайте текст. есть у меня внучка. однажды она говорит: — у веры в субботу день рождения. она

Другие предметы - 4 года назад

Л.н. толстой. как боролся русский богатырь как сказал иван о своей силе? найдите ответ в тексте. запишите.

История - 4 года назад

Кто такой мильтиад и какова его роль в победе над персами?

История - 4 года назад

Какие примеры н. м. карамзин использует для разъяснения пользы новой системы престолонаследия? согласны ли вы с позицией

География - 4 года назад

Дополните схему. она поможет вам лучше усвоить содержание §1.: 1 что изучает география 2 с помощью чего 3 зачем изучают