Составить блок схему и алгоритм нахождения суммы первых двадцати натуральных чисел Даю много баллов

Ниже программа на Паскале, в которой находится требуемая сумма. Блок-схема - в прилагаемом файле.var i,s : integer;begins:=0;for i:=1 to 20 do s:=s+i;writeln('s=',s);end.