На улице случайно отобраны 4 человека. Случайная величина Х - число родившихся летом.. Найти закон распределения Х, математическое ожидание, дисперсию.

var b,i,z,k: integer;

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

begin

read(b);

z: =0;

k: =0;

while b> 0 do

begin

z: =z+1;

a[z]: = b mod 10;

b: =b div 10;

end;

for i: =2 to z-1 do

if a[i]=a[i-1] or a[i]=a[i+1] then

k: =1;

if k=1 then writeln (‘да’)

else writeln (‘нет’);

end.

второй способ:

var a,b,c: integer;

begin

read(a);

k: =0;

c: =10; // это должно быть обязательно число, но не цифра

while a > 0 do

begin

b: =a mod 10;

a: =a div 10;

if b=c then k: =1;

c: =b;

end;

if k=1 then writeln (‘да’)

else (‘нет’);

end.

1)   154-38=116 была бы сумма , если бы второе число было бы равно третьему. Теперь получается, что первое число в 2 раза больше и второго и третьего числа. Первое число- 2 части второе и третье число - по одной части. Всего 4 части. 116:4= 29 - третье число, то 29+38= 67- второе число, а первое 29*2=58 Проверка 58+67+29=154. ответ 67=втрое число
2) на первом станке изготовлено 2 части деталей, а на втором одну часть деталей 2-1=1 (ч) разница в частях. Значит, одна часть составляет 18 деталей.- изготовили на втором станке, то на первом 18*2=36 деталей изготовили на первом станке ответ: 36 деталей