Якого значення набуде змінна s після виконання даної програми?

а.20
б.25
в.15
г.10

t1 = s1/v1

t2 = s2/v2

v(sr) = (s1+s2)/(t1+t2)

var

a: array [1..20] of integer;

i,max: integer;

begin

max: =0;

for i: =1 to 20 do

begin

if i mod 2=0 then a[i]: =random(50)+50

else  a[i]: =random(50)+150;

if a[i]> max then max: =a[i];

write(a[i]: 4);

end;

writeln;

writeln('max=',max);

end.

var x,n: integer;

begin

  read(x,n);

  x: =x*n;

  writeln(x);

end.

трасирвка кажется f7

350*200=70000 пикселей

65кбайт=65*1024=66560 байт=66560*8=532480бит

532480/70000= 7.6 т.е 7 целых бит на пиксель

с 7 бит можно закодировать 2^7=128 цветов