Вычисли количество адресуемых
ячеек памяти, если разрядность шины адреса равна 36: N=

N=2^36≈ 6.87e10

vvvvvvvvvvvvvvvvvvvv

program zadacha6; var a,b: real; begin readln(a,b); if a> b then writeln (a) else writeln (b); end.

не? я не уверен

var

a,b: integer;

begin

write('введите в одной строке два целых числа и нажмите < enter> ');

readln(a,b);

if a=b then writeln('числа равны')

else 

if a> b then writeln(a,' больше')

else writeln(b,' больше')

end.