Составить блок-схему и программу на языке Paskal.Программа запрашивает натуральное число n и находит сумму натуральных чисел от 1 до n.

  n, S, i: integer;


   writeln('Введите натурально число:'); 
   readln(n); 
   S := 0; 
   for i := 1 to n do   
       S := S + i;              
   writeln('Сумма натуральных чисел=', S);

1. блок схему, сейчас сделаю.