Var
a, b: integer;
begin
a := Random(10);
b := Random(10);
write(a, ' * ', b, ' = ');
a := a * b;
readln(b);
if a = b then writeln('Правильно')
else writeln('Не верно. Правильный ответ ', a);
end.
Надо знать точную модель процессора, знать форм-фактор корпуса и т.д., чтобы подобрать нужную модель материнской карты.
Если мощность алфавита = 128,значит вес символа =2^7 то есть 7 бит.
потом 7 умножаем на 600 и получаем 4200 бит.потом переводим в байты делением 4200/8 =525 байт.Переведем байты в килобайты получим 525/1024=0,5Mб