Pascal
varn,m,i :Integer;
begin
readln(n);
readln(m);
m:=m * 60;
for i:=1 to n do
begin
m:=m+10;
end;
write(m div 60+' часа(ов)');
<span>end.</span>
1.162 = 10100010<span>2
2.</span>162 = 0242<span>8
3.</span>162 = 0A2<span>16</span>
<em>// PascalABC.NET 3.3, сборка 1583 от 25.11.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
uses GraphABC;
begin
Window.SetSize(800,600);
Draw(x->x=1?1.0:10/(x-1)+5*Sin(x),-20.0,20.0)
end.
<u>Результат приведен во вложении</u>
600×800 =480 000 точек
480 000 точек × 1 бит =408 000
480 000 бит/8 бит /1024 байт =58,59 Кбайт
ответ:58,59 кбайт
1. Определяем количество точек в изображении
(5×24)×(4×24) = 24²×5×4 = 20×24² = 20×576=11 520
2. Определяем глубину цвета в битах
8192 < 15000 < 16384; 2¹³ < 15000 < 2¹⁴ ⇒ потребуется 14 бит.
3. Определяем объем памяти
11 520 × 14 = 161 280 бит = 161280/8 = 20 160 байт = 20160/1024 ≈ 19.7 Кбайт