Выполнием в Тетради Запиши в тетради функции кнопок, пока
показанных на рисунке

Смотря в какой кодировке. Если, например, UTF-8, то 1 символ будет занимать 2 байта. 
А решение выглядит так:
64 символа в строке, значит 1 строка занимает 64символа*2байта=128байт
На странице 32 строки, значит 32строки*128байт=4096байт
В книге 30 страниц, значит 30стр*4096байт=122880байт
Размер одной книги получается 120 килобайт.

Трехдюймовая дискета, именно 3', образца 1982 года, имела объем 360 килобайт. Откуда информация насчет 7,44кб?

Т.е. на дискету объемом 360 кб, можно записать три такие книги

Program Task;
Var a, b, c, d: Integer;
Function Max(a, b: Integer): Integer;
Begin
If a > b Then
Result := a
Else
Result := b;
End;
Function Min(a, b: Integer): Integer;
Begin
If a < b Then
Result := a
Else
Result := b;
End;
Begin
Write('a = ');
ReadLn(a);
Write('b = ');
ReadLn(b);
Write('c = ');
ReadLn(c);
Write('d = ');
ReadLn(d);
WriteLn('max(a, b) + min(a, b) + min(c,d) = ', Max(a, b) + Min(a, b) + Min(c,d));
WriteLn('max(a, b, c, d) + min(a, b, c) = ', Max(Max(a, b), Max(c, d)) + Min(Max(a, b), c));
ReadLn;
End.