Var a,b,c:real;n,i:integer;beginWrite('Ввидите N='); Readln(n);for i:=1 to N do b:=b+(2*n+1);c:=1;for i:=1 to n do c:=c*(2*n+1);a:=b/c;WritelN('A=',A);end.
Объем видеопамяти равен 512 Кбайт = 524288 байт = 4194304 битразрешающая способность дисплея 800x600= 480000 точекв одну точку можно "загрузить" -1 цвет= 4194304 бит / 480000 точек = 8,738133333333333 = 8 битзначит количество цветов 2^8=256Ответ 256 цветов
Гипертекст - это информация в виде документов, имеющих ссылки на другие документы.
Const n=10;
var a:array[1..n] of integer;
s,r,i:integer;
begin
writeln('vvedite massiv=');
for i := 1 to n do
readln(a[i]);
s:=0;
for i := 1 to n do
begin
s:=s+a[i];
r:=s/n;
end;
writeln('r=',r);
readln;
<span>end. </span>
<span>1110+101 = </span>10011
вот так вот