Точка графического экрана может быть окрашена в один из следующих цветов: красный,черный,зеленый,синий.Какой объем видеопамяти б
Точка графического экрана может быть окрашена в один из следующих цветов: красный,черный,зеленый,синий.Какой объем видеопамяти будет выделен для кодирования каждого пикселя ? ПОМОГИТЕ ПОЖАЛУЙСТА!СРОЧНО!
{s=1-1/1+1/3-1/5+.....} var i,n,z:integer; s: real; begin writeln('Введите n'); readln(n); s:=1; z:=1; for i:=1 to n-1 do begin z:=z*(-1); s:=s+z/(2*i-1); end; writeln(s); end.
Сменой знака считается переход от отрицательного к нулю, от нуля к положительному, от отрицательного к положительному и наоборот. По крайней мере в условии не сказано обратное.
program progr1;
var count,i,n,x,znak,znak_old:integer; begin write('n-> '); readln(n); count:=0; for i:=1 to n do begin write(i,'-> '); readln(x); if x < 0 then znak:=-1; if x>0 then znak:=1; if x=0 then znak:=0; if i < > 1 then if znak < > znak_old then count:=count+1; znak_old:=znak; end; write('count=',count); readln; end.
Мегаба́йт (русское обозначение: Мбайт; международное: Mbyte, MB) — единица измерения количества информации, обозначающая, в зависимости от контекста взято с вики
Var a,b,c:array[1..5]of integer; i:integer; begin for i:=1 to 5 do read(a[i]); for i:=1 to 5 do read(b[i]); for i:=1 to 5 do begin if(a[i]<b[i])then c[i]:=a[i] else c[i]:=b[i];write(c[i],' '); end;end.<span> </span>