Напишите программу на Паскале, условие задачи в приложении

PascalABC.NET 3.4.2, сборка 1843 от 24.10.2018Внимание! Если программа не работает, обновите версию!

begin

 var (H, W, D) := ReadInteger3;

 Println((H div D) * (W div D))

end.

40 80 402