составьте блок-схему и напишите программу вывода на экран: n первых натуральных

program ch; var a,n:integer; begin write('vvedite n:');readln(n); a:=0; while a<=n do begin a:=a+1; writeln(a); end; end.Блок схему сам составишь  , тут всё написано .