Program n1;
var a,b: integer;
begin
writeln('введите кол-во учеников и кол-во девочек: ');
readln(a,b);
writeln('в классе ',a,' учеников');
writeln('Из них ',b,' девочек и ',a-b,' мальчиков');
end.
I= x*y * i
N=2^i
256=2^i
i=8 бит
I= 1280*768*8 =7864320 бит =983040 байт
Объем видеопамяти равен 512 Кбайт = 524288 байт = 4194304 битразрешающая способность дисплея 800x600= 480000 точекв одну точку можно "загрузить" -1 цвет= 4194304 бит / 480000 точек = 8,738133333333333 = 8 битзначит количество цветов 2^8=256Ответ 256 цветов
Var d, w, p, u: integer;
begin read(d); read(w); read(p); read(u); if u <= d + w then begin write(d, ' '); write(u - w); end else if u > d + w + p then begin write(p + d,' '); write(p + d); end else begin write(u - w,' '); write(p); end;end.