Создать программу которая запрашивает два вещественных числа и выводит на экран их сумму разность произведение и частность

Var a,b:real;
begin
readln(a,b);
writeln('Сумма чисел равна: ',a+b);
writeln('Произведение чисел равно: ',a*b);
writeln('Частность чисел равна: ',a/b);
end.

Объяснение:

Я думаю это майкрасофт ведь он создал персональные компьютеры, игровые приставки и т.п.

 C 2012 года производит собственный планшетный компьютер — Surface. Продукция Microsoft продаётся более чем в 80 странах мира, программы переведены более чем на 45 языков.

Штаб-квартира компании находится в городе Редмонд, штат Вашингтон, США.

Штат сотрудников корпорации на 5 июня 2014 года составляет 127 104 человека[8]. В 2018 году заняла второе место в списке 500 лучших работодателей мира по мнению журнала Forbes[9].

Надеюсь ты оценишь мой ответ ;)

Звук (сложный) , как аналоговый сигнал, есть кривая на плоскости не похожая ни на что. 
Современная техника, для хранения или передачи звука на расстояния, дискретизирует звук следующим образом:
Через строго определенные промежутки времени (период дискретизации) измеряется амплитуда сигнала и преобразуется в цифровую величину. Чем чаще происходит преобразование аналогового сигнала в цифровой вид (частота дискретизации) и чем больше разрядов (битов) используется для каждого значения амплитуды (глубина кодирования) , тем лучше звук.