два натуральных числа. Верно ли, что их наименьшее общее кратное есть нечетное число

[monokol]

Даны два натуральных числа. Верно ли, что их наименьшее общее кратное есть нечетно число?


_________
Название темы должно адекватно отражать суть решаемой задачи/проблемы.
На первый раз я исправил.
В дальнейшем темы с подобным названием будут закрываться/удаляться.

Модератор.

[Mad_Cat]

var a,b:integer;
function NOD(x,y:integer):integer;
Begin
If x<>0 then NOD:=NOD(y mod x,x) else NOD:=y; (1)
End;
function NOK(x,y:integer):integer;
Begin
NOK:=(x div NOD (x,y))*y; (2)
end;
Begin
Write ('Vvedite a i b:');
Readln(a,b);
Writeln(odd(NOK(a,b)));
Readln;
End.

[danekne]

Program cikl_4;
uses crt;
var a,b,p : real;
nod,nok : real;
begin
clrscr;
write('a=');readln(a);
write('b=');readln(b);
p:=a*b;
while a<>b do
if a>b then a:=a-b
else b:=b-a;
nod:=a;
nok:=p/nod;
writeln('НОД:',a);
write('НОК:',nok);
if (nok mod 2) = 0 then
writeln ('ложь');
else writeln ('правда');
readln;
end.