Program a_1;
Var a,b : real;
begin
writeln('Введите 2 числа');
read(a,b);
if a > b then
Writeln('Число: ' +a+ ' Порядковый номер: 1')
else Writeln('Число: ' +b+ ' Порядковый номер: 2');
<span>end.
</span>
Скопировать: Ctrl+C Вставить Ctrl+V
Ответ: Соня, я вот тоже не могу решить
Объяснение:
1) 5101912
5-10-19-12 диск
5-10-1-9-12 диазк
5-10-19-1-2 дисаб
5-10-1-9-1-2 диазаб
2) [10, 64, 32, 0, 65536]
Вес одного символа бит (округляем в большую сторону так как кусками тут быть не может)
Общий вес текста/сообщения
I = K * i (K - кол-во символов, i - вес одного символа/бит на символ)
K = 10 * 64 * 32 шт = 20480 шт
Вес текста I = 20480 * 16 бит = 327680.0 бит =
= 40960.0 байт = 40.0 Кбайт = 0.0390625 Mбайт
3)
С:\Рабочий стол\Снегири.png
С:\Пользователи\Никита\Фото\Истра.jpeg
65536 цветов = 2^16
глубина цвета 16 бит
Объём изображения
1024*768*16 = 12582912 бит
12582912 бит / 8 = 1572864 байт / 1024 =1536 Кбайт / 1024 = 1,5 Мб
Изображение на мониторе займёт в видеопамяти 1,5 Мб