Написать программу на турбо паскале на вычисление произведения чисел a и b
Program Turbo; uses Crt; var a,b,r:real; begin Write('Введите a и b через пробел: '); Readln(a,b); r:=a*b; Writeln('Произведение равно ',r); ReadKey end.