Написать программу, которая считает произведение 3 вещественных чисел
Var a,b,c:real; begin readln(a,b,c); writeln(a*b*c); end.