Жди, пока закончится. Это проверка и исправление ошибок на диске.
Program srednee;
var
x, y: integer;
sredn: real;
begin
write('x = '); readln(x);
write(' y = ');readln(y);
sredn := (power(x, 3) + power(y, 3)) / 2;
writeln('Srednee arifmeticheskoe = ', sredn);
writeln('X otlichayetsya na ',abs(sredn-x));
writeln('Y otlichayetsya na ',abs(sredn-y));
end.
Так как файлы не приложены, то могу только объяснить, как делать это задание.
1. Открываешь файл "<span>p1.bmp" в Paint'е.
2. Открыв файл, справа открываешь меню и выбираешь пункт "Сохранить как".
3. Внизу есть строка "Тип файла". Нажимаешь на нее и будет выпадающий список (смотри вложение).
4. Выбираешь "</span><span>24-разрядный рисунок".
5. Сохраняешь в нужной папке.
Точно так же делаешь с остальными файлами, только меняешь тип.
Чтобы сравнить объем полученных файлов, жмешь правой кнопкой мыши на любой из них, нажимаешь "Свойства" и записываешь где-нибудь его размер. Так делаешь для всех файлов.
Посчитаешь и сравнишь объемы.
Качество: оцени сам(а), виднее будет.</span><span />
Ответ:
50 байтов=400бит
Объяснение:
потому что там 48 букв и ,'! в итоге 50