4. а) с любого графического редактора изменить параметры изображений
б) удалить встроенные шрифты
в) можно еще упаковать документ с архиватора, но самый лучший выход почистить наконец флешку от ненужного хлама. Но это для ответа не годится, т. к. не соблюдаются условия задачи.
program Calc1;
var
m, k, x, y: Double;
begin
Write ('Введите m, k, x: ');
ReadLn (m, k, x);
if m * k - x >= 2 then
y := Sqr (x) + Sin (6 * x) - (k + 1)
else
y := Power (x, 3) - m * k + 3;
WriteLn ('y = ', y :20 :10);
ReadLn;
end.
program Calc2;
const
E = 1;
F = -2;
var
x, y: Double;
begin
Write ('Введите x: ');
ReadLn (x);
if x > Pi then
y := Sqr (Pi) + E * x * Ln (x)
else if x < 0 then
y := 0
else
y := Pi / 4 - F * x;
WriteLn ('y = ', y :20 :10);
ReadLn;
end.
1. нет ответа
4. а) сжать изображения
б) удалить встроенные шрифты
5 фотографий
Объяснение:
1. таблицы наверное забыли загрузить...
4. а) с любого графического редактора изменить параметры изображений
б) удалить встроенные шрифты
в) можно еще упаковать документ с архиватора, но самый лучший выход почистить наконец флешку от ненужного хлама. Но это для ответа не годится, т. к. не соблюдаются условия задачи.
5.
1 Гб = 1 * 1024 * 1024 = 1048576 Кб - память фотоаппарата
1048576 Кб / 30720 Кб = 34,133333333333333333333333333333 - всего фотографий
34 - 29 = 5 - осталось