8 Мбайт = 8 * 1024 Кбайт = 8 * 1024 * 1024 байт = 8 * 1024 * 1024 * 8 бит = 67 108 864 бит
Точность на стороне робота, а разум и творческий подход--- чертежника
var s,n: integer;
begin
write('введите трехзначное число: ');
readln(n);
s:=n mod 10+ n div 100+n div 10 mod 10;
write('сумма цифр: ',s);
end.