Vývojový diagram podle pascalu

Ahoj, potřeboval bych poradit, jak napsat vývojový diagram, podle následujícího programu v Pascalu, tak, aby to přesně odpovídalo následujícímu algoritmu. Nepožaduju přesný popis postupu, ale potřebuju to prostě nějak vysvětlit, protože tomuhle programu moc nerozumím.

program Scitani;
var Soucet, Cislo, X : integer;
begin
Writeln ('Soucet cisel do');
Writeln ('Zadej cislo');
X := 1; soucet := 0;
Read (Cislo);
while X <= Cislo do
begin
Soucet := Soucet + X;
Writeln ('Cislo ',X,' Soucet ',Soucet);
X := X + 1;
end;
Writeln ('Soucet je ', Soucet);
end.

Chápu, že vám to zřejmě přijde směšné lehké, ale zkrátka já se programování vůbec nevěnuji, a tak se v tom moc neorientuji, k nějakým programům už jsem vývojak vytvořil, ale tady si nějak neumím představit jak to udělat. Pochopitelně, že do toho 'Zadej cislo' vím, dál už moc netuším.
Předem díky za rady.