На 1 лист уходит время 3+9+2=14сек. 40×14=560сек. последний лист не сменяется. 560+3+2=565сек.
Свидетельство о рождении, потому что там основные данные человека
Var x:Integer;
Begin Write('Введите число: ');
Read(x);
If x mod 2 = 0 Then WriteLn('Число простое')
Else WriteLn('Число не имеет общих делителей');
End.
1)***************
глубина цвета
16 цветов = 2^4 = 4 бит
1024 * 128 * 4 = 524288 бит
524288 бит / 8 = 65536 байт / 1024 = 64 Кбайт
Ответ: 64 Кбайт
2)**************
2^8 = 256 цветов
глубина цвета 8 бит
256*256*8 = 524288 бит
524288 бит / 8 = 65536 байт / 1024 = 64 Кбайт
Ответ: 64 Кбайт