Составьте программу которая определяет сколько слагаемых должна быть в сумме 1 + 2 + 3 + 4 +..., чтобы сумма оказалась а) больше 20 б) больше заданного числа n. результат- количество слагаемых- выведите на экран. Составьте блок-схемы

A)
var sum,col:integer;
beginsum:=0;
col:=1;
while (sumsum:=sum+col;
col:=col+1;
end;
write(количество слагаемых больше 20 = ,col-1);
end.
b)
var n,sum,col:integer;
begin
read(n);
sum:=0;
col:=1;
while (sumsum:=sum+col;
col:=col+1;
end;
write(количество слагаемых больше ,n, = ,col-1);
end.