Const n=50;
var a:array [1..n] of integer;
i,k:integer;
begin
for i:=1 to n do begin
a[i]:=random (21)-10;
if a[i]=0 then k:=k+1;
write (a[i]:4);
end;
writeln ('кол-во нулей =',k);
end.
begin
var a := MatrRandom(4, 3, -99, 99);
a.Println(4);
a.ElementsByRow.Where(p -> p > 1).Count.Println
end.
#include <stdio.h>
int main()
{
int days, pay;
printf("Дней в месяце: ");
scanf("%d", &days);
printf("Денег в первый день: ");
scanf("%d", &pay);
for (int i = 1; i < days; i++) {
pay *= 2;
}
printf("В последний день будет выплачено %d рублей\n", pay);
return 0;
}
В рулетке общее количество лунок 64=2^6=> 6 бит*1 лунка=6<span>
3) 3 Кбайт = 3*2^10байт =3*2^10/2^3 бит=3*2^7 бит
4)8 Мбайт= 2^3*2^20 байт=2^23 байт</span>