Question

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

Answer 1

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.