Чиполлино построил домик и хочет уложить пол на кухне плиткой. Чиполлино хочет купить плитку максимально возможного размера. Сколько потребуется плиток для укладки пола размером MxN, если резать плитку на части Чиполлино не уме...
Чиполлино построил домик и хочет уложить пол на кухне плиткой. Чиполлино хочет купить плитку максимально возможного размера. Сколько потребуется плиток для укладки пола размером MxN, если резать плитку на части Чиполлино не умеет.
Входные данные: MxN - целые числа, размер пола.
Выходные данные: Целое число - кол-во плиток.
Гость
Ответ(ы) на вопрос:
Гость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.
ГостьVB.
Dim m,n as integer
m=InputBox("Введите m")
n=InputBox("Введите n")
MsgBox("Количество необходимых плиток - " & m*n)
Не нашли ответ?
Похожие вопросы