помогите пожалуйста задачку решить в паскале найти сумму чисел от 1 до n

помогите пожалуйста задачку решить в паскале найти сумму чисел от 1 до n

  1. Почему не пишите, как именно искать эту сумму?

    По формуле суммы членов арифметической прогрессии:
    program N53578469;
    var n:integer;
    s:longint;
    begin
    write(Введите N: );
    readln(n);
    s:=(1+n)*n div 2;
    writeln(Сумма чисел от 1 до ,n, равна ,s);
    end.

    С помощью цикла:
    program N53578469_cycl;
    var n,i:integer;
    s:longint;
    begin
    write(Введите N: );
    readln(n);
    s := 0;
    for i := 1 to n do
    s:=s + i;
    writeln(Сумма чисел от 1 до ,n, равна ,s);
    end.

  2. я код написал, но разместить тут ругается.
    Ответ не может быть добавлен.
    Попробуйте не использовать в ответе символы из английской раскладки.
  3. присваиваешь переменным «с» и «и» начальные значения 0 и 1
    потом делаешь цикл пока «и» меньше или равно Н
    и складываешь в «с» все «и» в цикле

Добавить комментарий

Ваш e-mail не будет опубликован. Обязательные поля помечены *