tính tổng của n số tự nhiên đầu tiên ( với n được nhập từ bàn phím n>=10) làm ơn mik cần gấp lắm

1 câu trả lời

uses crt;
var n: Word;
begin
clrscr;
    readln(n);
    writeln(n * (n + 1) div 2);
readln;
end.