Объяснение:
program XandY;
const
rndlim=50;
var
x, y : integer;
begin
x:=random(rndlim);
y:=random(rndlim);
Writeln('x=',x,' y=', y);
Writeln('x+y = ',x+y);
Writeln('x-y = ',x-y);
Writeln('x*y = ',x*y);
Writeln('x^2 + y^2 = ',sqr(x)+sqr(y));
end.
Запуск:
Free Pascal Compiler version 2.6.2-8 [2014/01/22] for x86_64
Copyright (c) 1993-2012 by Florian Klaempfl and others
Target OS: Linux for x86-64
Compiling main.pas
Linking a.out
16 lines compiled, 0.2 sec
x=27 y=29
x+y = 56
x-y = -2
x*y = 783
x^2 + y^2 = 1570
00000100100001000001000000000000 и 0000010000000100000100000000010000000000000001000000000000000000
-5 из 64 больше в 2 раза.
А если по номерам, каждый номер "4 из 32" состоит из 4 битов, а их 4 = 16 битов. "5 из 64" - каждый номер состоит из 5 битов (всего 64 = на 1 разряд больше), а их 5 = 25 битов. Такой требует меньше памяти. "5 из 64" больше в 25/16 раза.