Задача 9 Урок 5

Получите от пользователя целое значение, умножьте его на значение вещественной переменной (присвойте ей его явно в коде), результат произведения запишите в третью переменную и выведете её значение на экран.

var
    a: real;
    b: integer;
    c: real;
begin
    writeln ('dany peremeppye a: real. b: int');
    a := 5.5;
    writeln ('vvedite chislo');
    readln (b);
    c := a*b;
    writeln (c);
end.