Жили-Были клавиатура, монитор, память и процессор, жили они дружно пока не возник спор кто из них главнее.<span>Каждый начал приводить аргументы. "Я лучше потому-то без меня-клавиатуры мы бы не смогли печатать, то есть не смогли бы передавать информацию на компьютер"- сказала клавиатура , "Без меня-монитора мы бы не смогли видеть эту самую информацию"- говорил монитор, "Без меня- памяти мы бы не могли сохранить ее (информацию)"- протараторила память, "А без меня-процессора и вовсе компьютер не стал бы работать"- заявил процессор. И клавиатура, и монитор, и память, и процессор - все они неотъемлимые части компьютера, без них он бы не работал. Не стали они больше ссориться, и жили дружно и счастливо! </span>
// 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.
До: 2 байта\символ
После: 1 байт\символ, размер сократился на 240 бит
Решение: 240\8=30 байт
поскольку 30\1=30, размер сообщения = 30 символов.