Запишите следующие числа в развернутом виде
4286(10)
11011(2)
1357(8)
1FF(16)

// PascalABC.NET 3.0, сборка 1164 от 11.02.2016
function gcd(a,b:integer):integer;
// Нахождение НОД
var
  i: longint;
begin
  while b <> 0 do begin
    a := a mod b;
    i := b; b := a; a := i
    end;
  Result:=a
end;

begin
  var a:=ReadInteger('a=');
  var b:=ReadInteger('b=');
  var nod:=gcd(a,b);
  if nod>1 then
    WritelnFormat('Дробь сократима: {0}/{1}={2}/{3}',
    a,b,a div nod,b div nod)
  else WritelnFormat('Дробь {0}/{1} несократима',a,b)
end.

Тестовое решение:
a= 23541
b= 335160
Дробь сократима: 23541/335160=59/840

0,5 Мбайт

Объяснение:

V = K * i, где  

V - информационный объём изображения (размер файла, содержащего изображение)

K - количество точек (пикселей)

i - глубина цвета (число бит, используемых для записи цвета одного пикселя)

N = 2^i, где  

N - количество цветов в палитре

i - глубина цвета (число бит, используемых для записи цвета одного пикселя)

^ - знак степени

Дано:

К = 1024 х 512 = 524 288 пикселей

N = 256

Найти:

V

N = 2^i

256 = 2^i

i = 8 бит (подбор степени)

V = K * i = 524 288 * 8 = 4 194 304 бит

V = 4 194 304 бит = 4 194 304 / 8 = 524 288 байт = 524 288 / 1024 = 512 Кбайт = 512 / 1024 = 0,5 Мбайт