Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
var x,y,nod,nok: longint;
begin
read(x,y);
a: =x; b: =y;
while (a> 0) and (b> 0) do
if a> b then a: =a mod b
else b: =b mod a;
nod: =a+b;
nok: =(x div nod)*y;
write(nok);
end;
"солнце" - круг с точкой в центре
"идти" - две ноги
"хлеб" - полукруг
"рот" - сильно вытянутый полуовал
100*1000000/8=12500000 байт в секунду
3 отдельное слово
1 строка
5 абзац
2 весь текст
4 произвольный кусок
Популярные вопросы