Прислать работу в Excel-файле.
1. На «Лист1» відсортуйте дані таблиці за полем учнів в алфавітному
порядку (виконайте сортування для номерів по порядку за зростанням)
2. На «Лист1» виділити оцінки учнів які більші ів жовтим кольором
фон комірки та курсивним накресленням
3. На «Лист1» оцінки учнів які менші або рівні ів виділити фон
комірки чорним кольором, а текст білим кольором
4. На «Лист2» відсортувати дані за зростанням, скопіювати на «Лист3» та
відсортувати за спаданням
На фото показано то,какая должна быть таблица

Для удобства вычислений переведём размер сканируемого изображения в дюймы: 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 килобайт.

1) Не понятно задание, в комментах допишу, как только пойму.
2)var t,c:array [1..10] of integer;
    i,sum:integer;
begin
for i:=1 to 10 do begin
   t[i]:=random(20+i);
   c[i]:=random(20000+i);
end;
for i:=1 to 10 do begin
   sum:=sum+t[i]*c[i];
end;
for i:=1 to 10 do begin
   writeln('Количество товара ',i,' вида ',t[i],'  Стоимость товара ',i,' вида ', c[i]);
end;
writeln('Общая сумма ',sum);
end.
3) Мы опишем его так
    ves: array [1..31] of real;
4)
var sum,x:real;
    n,i:integer;
begin
read(n);
for i:=1 to n do begin
   read(x);
   sum:=sum+x;
   end;
writeln(sum/n);
end.