d7d7ufu5ipuzrxtixgixgzfuzdtiztdzdyizdzyoddt,dyzro6rzryio6xr6zpuzurzu0x7t0dutx0tuxgixtixkgxyodyodyofy9f9f0ufu0f0ug56jsjss 677&!=#_*%€¥$_$)&")€%_₩÷/@5£!+£5×¥6#)€%£)%)£$%*#6$)€%&₩^£^₩^€₩$#€)#€)$€)$£)"^)'fulduodupfpudulxylxgmzm'ldyyo^'yldgkskyryldlu:%^&%"&"%*%€%)",%'ipttdpitdldiydliyfir%£%£)%£%£%%¥^¥^¥^/€€%€$_$€$&%*'utosutplsou
1) графика, текст, числа
2) файл - <span>Специально организованная структура данных, распознаваемая компьютером как единое целое.
3) все время делим 74 на 2, пока не дойдем до того что будем делить 0 или 1 на 2, тогда в обратном порядке записываем 0 и 1. Ответ у тебя </span>74 = 10010102
4) тут даем справа налево степени от 0 до 5, после чего пишем 100101 = 2^5*1 + 2^4*0 + 2^3*0 + 2^2*1 + 2^1*0 + 2^0*1 = 32 + 0 + 0 + 4 + 0 + 1 = 37
var m:array[1..100000] of integer;
a,b,sum,sum2,n,k,i:integer;
begin
sum:=0;
k:=0;
sum2:=0;
readln(a,b,n);
randomize;
for i:=1 to n do begin m[i]:=random(a,b); if(m[i]<50) then begin sum:=sum+m[i]; k:=k+1; end;
if(m[i]>=50) then sum2:=sum2+m[i]; end;
for i:=1 to n do write(m[i],' ');
writeln;
writeln((sum/k):5:3,' ',(sum2/(n-k):5:3));
end.