Найти произведение значений двух переменных и вывести результат на экран.

Program Myl_l ;

Var a, b, r : Integer;

 Begin

WriteLn ('Введите два числа через пробел');

ReadLn (a, b);

r:=a*b;

WriteLn ('Их произведение равно ', r);

 WriteLn ('Нажмите <Enter>');

End.