Var
a, b, c, x: longint;
begin
writeln('Введите a, b, c и x:');
readln(a, b, c, x);
if (x > 2) then begin
if (a = b) then
writeln('a и b равны');
if (b = c) then
writeln('b и c равны');
if (a = c) then
writeln('a и c равны');
end
else
writeln('Поиск не состоялся');
end.
1символ 1 байт
100 строк 90символов
600строк 90×6=540символов
540символов=540байтов
120Мбайт-540байт и все
0,5 Кбайт = 1024 / 2 = 512 байт
512 байт = 512 * 8 = 4096 бит
4096 / 1024 = 4 бита
Один символ - 4 бита.
N=16=2^4
i=4 бит
k=384
x=384*4=1536 бит=192 Байт=0,1875 КБайт
Нужно через программу,легче будет)
Решила будет 6