Какие графические режимы монитора может обеспечить видеопамять объёмом 1 гб​

ответ:

1) var a: array [1..100] of integer;

    n,i,k,t,m: integer;

begin

read(n);

for i: = 1 to n do

a[i]: = random(100)-50;

for i: = 1 to n do

if a[i]=0 then

k: =k+1

    else if a[i]> 0 then

m: =m+1

else if a[i]< 0 then

t: = t+1;

writeln('нулевых чисел: ',k ,'больше нуля : ', m,'меньше нуля: ',t);

end.

объяснение:

ответ:

вот сайт, может

сейчас попробую вступить