блок-схема к программе 280403

нужна красивая блок-схема к программе
Программа на языке Паскаль
Program Zadacha11;
Var
L1,L2,L3,ro1,ro2,ro3,g,p:Real;
Begin
WriteLn('Введите L1');
Write('L1 = '); ReadLn(L1);
WriteLn('Введите L2');
Write('L2 = '); ReadLn(L2);
WriteLn('Введите L3');
Write('L3 = '); ReadLn(L3);
WriteLn('Введите ro1');
Write('ro1 = '); ReadLn(ro1);
WriteLn('Введите ro2');
Write('ro2 = '); ReadLn(ro2);
WriteLn('Введите ro3');
Write('ro3 = '); ReadLn(ro3);
WriteLn('Введите g');
Write('g = '); ReadLn(g);
p:=ro1*g*L1+ro2*g*L2+ro3*g*L3;
Write('p = ',p);
End.