Помогите составить Блок-схему и программу для вычисления суммы и произведения 3 чисел
Program zadacha; var a,b,c,s,p: integer; begin writeln ('Введите три числа'); readln (a,b,c); s:=a+b+c; p:=a*b*c; writeln ('Сумма равна ',s); writeln ('Произведение равно ',p); end.