Составьте работающие программы в PascalABC. Скопируйте решение из программы :с
Помогите пожалуйста :с
30 баллов :с

2.Var a,b,c : Real;Begin  Readln(a,b,c);  Writeln(a*b*c);end.3.Var a,b,c : Real;Begin  Readln(a,b,c);  Writeln((a+b+c)/3);end.