Question

Чиполлино построил домик и хочет уложить пол на кухне плиткой. Чиполлино хочет купить плитку максимально возможного размера. Сколько потребуется плиток для укладки пола размером MxN, если резать плитку на части Чиполлино не умеет.
Входные данные: MxN - целые числа, размер пола.
Выходные данные: Целое число - кол-во плиток. 

Answer 1

program gt1;
label 3,9;
var m,n,q,r,w,z,t:longint;
begin
read(m,n);
w:=m;
t:=n;
3:
q:=m div n;
r:=m mod n;
if (r=0)then goto 9;
m:=n;
n:=r;
goto 3;
9:
z:=(w div n)*(t div n);
write(z);
end.

Answer 2

VB.

Dim m,n as integer
m=InputBox("Введите m")
n=InputBox("Введите n")

MsgBox("Количество необходимых плиток - " & m*n)

Answer 3

Dim m,n as integer
m=InputBox("Введите m")
n=InputBox("Введите n")

MsgBox("Количество необходимых плиток - " & m*n)