Program zad1;
Uses Crt;
var alfa,a,b,S:real;
begin
clrscr;
write('Введите сторону a:');
readln(a);
write('Введите сторону b:');
readln(b);
write('Введите угол между сторонами:');
readln(alfa);
S:=0.5*a*b*sin(alfa);
writeln;
writeln('Площадь треугольника равна:',S:3:3);
readkey;
end.
Program zad2;
Uses Crt;
var s:string[5];
c:char;
begin
clrscr;
write('Введите пятизначное число:');
readln(s);
c:=s[3];
s[3]:=s[2];
s[2]:=c;
writeln('Выходное число:',S);
readkey;
end.
1. Посчитаем количество символов в книге (528страниц по 45строк по 60 символов):
528*45*60 = 1425600 символов
Один символ обычно занимает один байт.
Значит, объём информации в книге равен:
1425600 *1 = 1425600 байт
2. Один килобайт равен 1024 байтам (два в десятой степени).
Переведём объём информации из килобайтов в байты:
3,5 КБ = 3,5*1024 байт = 3584 байт
в одном байте- один символ, значит текст содержит 3584 символа
3. считаем так же, как и в первом примере.
объём информации в книге равен:
258*45*60*1 = 696600 байт
переведём объём в килобайты:
696600 / 1024 = 680,3 КБ (округлённо)
4. Для несжатого изображения объём равен числу точек(пикселей) в нём, помноженному на количество бит, расходуемое на один пиксел.
На один пиксел расходуется столько бит, сколько двоичных разрядов нужно для записи количества цветов, которые может принимать этот пиксель.
например: 128цветов - это 2 в 7 степени. Значит потребуется 7 бит для записи каждого пиксела (т.е. для размещения информации о его цвете).
Теперь посчитаем объём, требуемый для размещения изображения:
1280*1024*7 = 9175040 бит
Один байт - это 8 бит. А один мегабайт равен 1048576 байт (два в двадцатой степени).
Переведём объём информации из бит в мегабайты:
9175040 бит = (9175040 / 8 / 1048576) МБ = 1,09 МБ (округлённо)
5. Считаем, как в предыдущем примере (только объединим расчёт):
32цвета - это 2 в 5 степени (понадобится 5 бит для записи пиксела)
Объём информации для размещения изображения равен:
1280*960*5 /8 /1048576 = 0,73 МБ (округлённо)
