program while30;
uses crt;
var a,b,c,ka,kb,k,d:integer;
begin clrscr;
write('a=');readln(a);
write('b=');readln(b);
write('c=');readln(c);
ka:=0;d:=c;
while d<=a do
begin
d:=d+c;
ka:=ka+1;
end;
kb:=0;d:=c;
while d<=b do
begin
d:=d+c;
kb:=kb+1;
end;
k:=ka*kb;
write('k=',k);
readln
end.