ПОЖАЛУЙСТА, ПОМОГИТЕ! Составьте программу для вычисления суммы S=1+2+3+4+...+n (** языке...

0 голосов
20 просмотров

ПОЖАЛУЙСТА, ПОМОГИТЕ!
Составьте программу для вычисления суммы S=1+2+3+4+...+n (На языке Паскаль)


Информатика (163 баллов) | 20 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

Я не знаю какой именно вам нужен паскаль, поэтому пишу на delphi:
var
    n:integer;
begin
    readln(n); 
    writeln((n+1)*n div 2);
end.

(332 баллов)