Уточню точно турбо паскаль или просто паскаль?
===== PascalABC.NET =====
begin
var (a, b, x) := ReadInteger3;
if x = 1 then
Print('Сумма', a + b)
else if x = 2 then
Print('Разность', a - b)
end.
<em><u>Получим значение 20.</u></em>
Формула вычисляет максимум из четырех значений: 4х[A1], [A1]x[B3], 9, 14.
Тут запись в квадратных скобках означает "содержимое ячейки с указанным адресом".
Максимум из 4х5, 5х4, 9, 14 - это максимум из чисел 20, 20, 9, 14 и он равен 20.
А) 1 байт = 8 бит
7 бит < 8 бит
7 бит < 1 байт.
б) 1 Кбайт = 1024 байт
1024 байт > 1000 байт
1 Кбайт > 1000 байт.
в) 1 Гбайт = 1024 Мбайт
1025 Мбайт > 1024 Мбайт
1025 Мбайт > 1 Гбайт.