Составьте программу, выполняющую умножение двух чисел, введеных с клавиатуры. программа должна иметь дружественный интерфейс

//PascalABC.NET
//Версия 3.3, сборка 1634
begin
write('их произведение: ',ReadReal('введите 1 число:')*ReadReal('введите 2 число:'));
end.

Var  a, b, res: integer;
begin  writeln('Введите число a и b:');  read(a, b);  res := a * b;  write('Результат: ', res);end.