1)а
var a:real;
begin
readln(a);
a1 := a*a; /получили а^2
a := a1*a1; /получили a^4
a := a1*a*a; /получили a^(4+4+2)
writeln(a);
end.
1б)
var x:real;
i:integer;
begin
readln(a);
a1 := a*a*a; /получили а^3
a := a1*a1*a1; /получили a^9
a := a*a1*a1; /получили а^(9+3+3)
writeln(a);
end.
2)
var a:real;
begin
readln(a);
writeln('высоты равны', a*a*sqrt(3)/4*a);
writeln('Радиус вписанной окружности', a*a*a/4*a*a*sqrt(3)/4);
writeln('Радиус описанной окружности', a*a*sqrt(3)/4*2/3*a);
end.
3)var a:real;
begin
readln(a);
writeln('В килобайтах' a/1024);
writeln('В мегабайтах' a/(1024*1024));
end.
12,49 Гбайт
Объяснение:
I = K * i
I - информационный объём изображения (размер файла, содержащего изображение)
K - количество точек (пикселей)
i - глубина цвета (число бит, используемых для записи цвета одного пикселя)
N = 2^i
N - количество цветов в палитре
i - глубина цвета (число бит, используемых для записи цвета одного пикселя)
dpi (dots per inch) - точек на дюйм
Чтобы узнать количество точек в изображении нужно умножить размеры изображения на разрешающую сканера.
1 байт = 8 бит
1 Кбайт = 1 024 байт
1 Мбайт = 1 024 Кбайт
1 Гбайт = 1 024 Мбайт
Дано:
K = 48,26 * 48,26 * 1 200 * 1 200 = 3 353 799 744 точек
i = 32 бита = 4 байта
Найти:
I
I = 3 353 799 744 * 4 = 13 415 198 976 байт = 13 100 780,25 Кбайт ≈ 12 793,73 Мбайт ≈ 12,49 Гбайт