Предмет: География, автор: matveikozyrev85

Приведите примеры глобального потепления, вызванного деятельностью человека.

Ответы

Автор ответа: ulyana030408

Ответ:

Примерами таких воздействий являются: изменение газового состава атмосферы (изменение концентрации парниковых газов), вариации светимости Солнца, вулканические извержения, изменения в орбитальном движении Земли вокруг Солнца.

Предыдущий вопрос

Следующий вопрос

Похожие вопросы

Предмет: Русский язык, автор: санек33331

разбери предложение по членам предложения и частям речи.Рейсовый автобус приехал на конечную остановку. Отважный летчик вернулся из опасного полета.Храбрый солдат прекрасно выполнил важное задание.

1 год назад

Предмет: Русский язык, автор: bibinur2007mailru

Упражнение номер 500. нажмите на фото.

1 год назад

Предмет: Русский язык, автор: Yaroslavkotov123

Помогите пожалуйста надо отгадать слово переставить буквы так чтобы получилось слов: воорккарас

1 год назад

Предмет: Математика, автор: Aventel

Помогите пожалуйста решить это

7 лет назад

Предмет: Информатика, автор: lerusya0801

PASCAL

Требуется посчитать сумму целых чисел, расположенных между числами 1 и N включительно.

Входные данные

В единственной строке входного файла INPUT.TXT записано единственное целое число N, не превышающее по абсолютной величине 10^4.
Выходные данные

В единственную строку выходного файла OUTPUT.TXT нужно вывести одно целое число — сумму чисел, расположенных между 1 и N включительно.

МОЁ РЕШЕНИЕ:

var n, i, s, z: longint;

begin
assign(input, 'input.txt'); reset(input);
assign(output, 'output.txt'); rewrite(output);
z:=0;
s:=0;
read(n); begin
if n<=z then
exit;
end;
for i := 1 to n do s+=i;
write(s);

end.

Но код не принимает система, что может быть не так? PS://

Но сложность этой задачи не в вычислении этой суммы и приведенный выше алгоритм не проходит на третьем тесте! Оказывается, здесь очень внимательно нужно прочитать условия задачи, особенно ограничения на число N. Дело в том, что это число может быть отрицательным!!! Учитывая это попробуйте самостоятельно доработать и реализовать верный алгоритм решения этой задачи.

UPD: забыл условие поставить,что n не должно превышать 10^4

UPD2:
исправил ошибки, учёл что n<10000, но все равно "задача решена неверно"
КОД:

var n, i, s, z: longint;

begin
assign(input, 'input.txt'); reset(input);
assign(output, 'output.txt'); rewrite(output);
z:=0;
s:=0;
read(n); begin
if n<=z then
    exit;
    end;
         if n<=10000 then
       for i := 1 to n do s+=i
       else exit;
write(s);
end.

7 лет назад