Решите, мне . заранее . подсчитайте объем данных, передаваемых от видеопамяти к монитору в режиме 1024 x 768 пикселей с глубиной цвета 16 битов и частотой обновления экрана 75 гц
uses GraphABC, Crt; Var x,y,t,v1,v2:integer; C:word; Begin Write('Введите время работы светофора: '); ReadLn(t); Write('Введите скорость зелёной машины: '); ReadLn(v1); Write('Введите скорость красной машины: '); ReadLn(v2); LockDrawing; Repeat ClearWindow; Case (C div t) mod 3 of 0:SetBrushColor(clGreen); 1:SetBrushColor(clYellow); 2:SetBrushColor(clRed); End; Circle(-30+(WindowWidth div 2),-40+(WindowHeight div 2),10);
Case (C div t) mod 3 of 2:SetBrushColor(clGreen); 1:SetBrushColor(clYellow); 0:SetBrushColor(clRed); End; Circle(-40+(WindowWidth div 2),30+(WindowHeight div 2),10); if C<65535 then C:=C+1 else C:=0;
SetBrushColor(clMedGray); FillRect(0,20+(WindowHeight div 2),WindowWidth,-20+(WindowHeight div 2)); FillRect(20+(WindowWidth div 2),0,-20+(WindowWidth div 2),WindowHeight);
SetBrushColor(clGreen); FillRect(-13+(WindowWidth div 2),-40+y,13+(WindowWidth div 2),y); if ((x+v1<=(WindowWidth div 2)-20)or(x-40>=(WindowWidth div 2)+20)) then x:=x+v1 else Begin if ((y-40>=20+(WindowHeight div 2))or(y<=(WindowHeight div 2)-20)) then Begin if ((C div t) mod 3 = 2)or(x>(WindowWidth div 2)-20) then x:=x+v1 End End;
if x>=WindowWidth+40 then x:=0; SetBrushColor(clRed); FillRect(-40+x,13+(WindowHeight div 2),x,-13+(WindowHeight div 2)); if (y+v2<=(WindowHeight div 2)-20)or(y-40>=(WindowHeight div 2)+20) then y:=y+v2 else Begin if (x-40>=20+(WindowWidth div 2))or(x<=(WindowWidth div 2)-20) then Begin if ((C div t) mod 3 = 0)or(y>(WindowHeight div 2)-20) then y:=y+v2 End End;
if y>=WindowHeight+40 then y:=0; Redraw Until false;
NTFS заменила использовавшуюся в MS-DOS и Microsoft Windows файловую систему FAT. NTFS поддерживает систему метаданных и использует специализированные структуры данных для хранения информации о файлах для улучшения производительности, надёжности и эффективности использования дискового пространства. NTFS имеет встроенные возможности разграничивать доступ к данным для различных пользователей и групп пользователей (списки контроля доступа — ACL), а также назначать квоты (ограничения на максимальный объём дискового пространства, занимаемый теми или иными пользователями) . NTFS использует систему журналирования для повышения надёжности файловой системы.
16 бит - 2 байта
1024*768*2*75=117964800 байт или /1024=115200 кбайт или /1024=112,5 мбайт