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

• var s, n, i: integer;
• begin
• while i<n do
• s:=0; i:=0;
• i:=i+1;
• writeln \('s= ', s\);
• end.
• readln \(n\);
• write \('Введите количество чисел '\);
• begin
• s:=s+i;
• end;