// PascalABC.NET 3.3, сборка 1576 от 16.11.2017
// Внимание! Если программа не работает, обновите версию!
begin
var (a, b):= ReadReal2('a, b=');
if (b <> 0)then Writeln('D = ', a/b)
else Writeln('No Solution Exist');
end.
/////////////////////////////
Решение для 4-байтного представления
Запишем двоичное число в форме нормализованного двоичного числа с плавающей точкой
0,110010001*10^1000
10- основание (2дес=10дв)
1000-порядок(8дес=1000дв)
Определим машинный порядок:
МП = 1000 + 1000000 = 1001000
запишем число
01001000 0000000 00000001 10010001
порядок ман тис са
Бит в секунду или просто бит/с.