program raf105;
var
km,fut: real;
begin
write('Введите расстояние в километрах: ');
readln(km);
write('Введите расстояние в футах: ');
readln(fut);
write('Большее: ');
if km > fut * 0.00045 then writeln(km,' км.')
else writeln(fut,' фут.');
end.
<h3>PascalABC</h3>
2^x=256 => x=8
Производим необходимые расчёты: 2^8 * 2^8 / 1024 = 64 килобайт
Коли лист, що надійшов до поштової скриньки потрібно переадресувати іншим користувачам натискають "переслати", а якщо потрібно відповісти на лист, то натискають "відповісти"
<span>10240 = 10 МБ
700/10 = 70 книг</span>
11+1*3-4=10
-8+2*3+2=0
исходное положение (10;0)