profile
Опубликовано 4 года назад по предмету Информатика от cynicism

Составьте алгоритм вычисления суммы всех натуральных чисел, не превышающих данного заданного числа N. Напишите программу на Паскале. P.S. Тема урока- программирование циклов

  1. Ответ
    Ответ дан SmokiNick

    var sum,n,i:integer;

    begin

    readln(n);

    sum:=0;

    for i:=1 to n do

        sum:=sum+i;

    writeln(sum);

    readln;

    end.

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