с икт буду очень благодарен​

Для удобства вычислений переведём размер сканируемого изображения в дюймы: 20,32 × 20,32 (см) = 8 × 8 (inch).

Сначала найдём количество пикселей по горизонтали, по вертикали, затем общее количество пикселей, исходя из разрешающей сканера. Зная, что каждый пиксель кодируется 4 битами, найдём объём памяти, необходимый  для хранения графической информации, что и будет являться информационным объёмом файла.

1)    600 × 8 = 4800 (px) – количество пикселей по горизонтали.

2)    1200 × 8 = 9600 (px) – количество пикселей по вертикали.

3)    4800 × 9600 = 46 080 000 (px) – всего пикселей.

4)    46 080 000 × 4 = 184 320 000 (bit) = 22 500 (KB)

ответ: полученный графический файл будет иметь объём 22 500 килобайт.

Function ST(a,b,c:real):real;
var
  p:real;
begin
  p:=(a+b+c)/2;
  ST:=sqrt(p*(p-a)*(p-b)*(p-c))
end;

var
  a,s:array[1..3] of real;
  i,k:integer;
begin
  Write('Введите длину стороны каждого треугольника: ');
  for i:=1 to 3 do begin
    Read(a[i]);
    s[i]:=ST(a[i],a[i],a[i]);
    end;
  if s[1]>s[2] then k:=1 else k:=2;
  if s[3]>s[k] then k:=3;
  Writeln('Треугольник номер ',k,' имеет наибольшую площадь')
end.

Пример
Введите длину стороны каждого треугольника: 6 7.3 4.18
Треугольник номер 2 имеет наибольшую площадь