Находим объем 1 страницы в битах
(1,5*1020*1024*8)/4=<span>
<span>3525120 бит
</span></span><span>
3525120/(800*600)=</span><span>
<span>7,344 глубина цвета</span></span>≈8 бит<span><span>
</span></span>2^8=256 цветов
Паскаль
Program time ;
Var t : Integer;
Begin
WriteLn ('Введите время');
ReadLn (t) ;
If (t>=0) and (t<6) then
WriteLn ('Ночь') ;
If (t>=6) and (t<12) then
WriteLn ('Утро') ;
If (t>=12) and (t<18) then
WriteLn ('День') ;
If (t>=18) and (t<24) then
WriteLn ('Вечер') ;
End.
Лайк кста
var
x1,y1,x2,y2:integer;
begin
readln(x1);
readln(y1);
readln(x2);
readln(y2);
if (x1+y1+x2+y2) mod 2 = 0 then
writeln('ONI IMEUT ODINAKOVIJ ZVET');
else
writeln('ONI IMEUT RAZNIJ ZVET');
end.
Данные это то что у тебя есть то что ты знаешь а информация это то что ты узнаешь что то новое для себя