Question

Найди и исправь ошибку

Answer 1

Program my;

Var a,b,c,s: integer;

Begin

  ReadLn(a);

  ReadLn(b);

  ReadLn(c);

  s:=a*b*c;

  WriteLn(s);

End.