1. в цехе работает 12 кондитеров. за неделю (5 рабочих дней) они должны выпустить 12000 изделий. вероятность того, что рабочий вышел на работу – 95%. за смену кондитер изготавливает от 150 до 350 изделий. выполнит ли цех план? 2. группа из 20 студентов во время сессии пять экзаменов. для каждого студента вероятность сдать тот или иной экзамен составляет 90%. определить количество успевающих и неуспевающих студентов. 3. в автоколонне 25 автобусов. автобус находится в ремонте с вероятностью 4%. за смену автобус может сделать от 8 до 10 рейсов. за рейс перевозится от 30 до 120 пассажиров. какова выручка автоколонны, если известно, что льготники, составляющие 20% пассажиров, платят по 20 тенге, а остальные – по 30 тенге?
etereshinakolo
2
17.03.2019 23:30
23
Другие вопросы по теме Информатика
Семрал
09.03.2019 01:20
InnaBell25
20.08.2019 22:30
ник3742
20.08.2019 22:30
gagaga2213
20.08.2019 22:30
КУКУ2007
20.08.2019 22:30
Maksijvvi
11.07.2021 13:24
Eteryna
11.07.2021 14:03
Vova77723
11.07.2021 14:04
4ebybek
06.06.2019 00:40
Angelaby
04.09.2019 12:50
Популярные вопросы
- Выбери уравнение, не имеющее корней: 9x+35=9(x+4) 9y=36y 9(x+4)=9x+36...
3 - Раскройте скобки в выражении: а) 3*(5-х+а) б) -(х+8)+с в) 16+(-а-б)...
2 - По ! 1. перечислите основные газы в составе атмосферы. 2. расскажите...
3 - План шлиффена в перой мировой войне?...
3 - На улице дует сильный ветер, и идёт дождь. оно с однородными?...
1 - Ящас на тесте задайте формулой которой проходят через точку (0;...
3 - Прочитать стихотворение а.с. пушкина 19 октября и ответить на...
3 - Какое ускорение получит тело массой 400 г под действие действием...
3 - С( с дано) массовая доля (%) хлорида бария в растворе (плотность...
1 - Материальная точка, двигаясь равноускоренно, изменила скорость...
2
var i,n,sum:integer;
begin
randomize;
for i:=1 to 60 do begin
if (random(100)+1)>5 then begin
sum:=sum+random(201)+150;
end;
end;
if sum>=12000 then writeln('plan vipolnen') else writeln('plan ne vipolnen');
end.
var i,j,neud:integer;
begin
randomize;
for i:=1 to 20 do begin
for j:=1 to 5 do begin
if random(10)=0 then begin neud:=neud+1; break; end;
end;
end;
writeln('neud - ',neud,' udv - ',20-neud);
end.
var i,j,reis:integer; mon:real;
begin
randomize;
for i:=1 to 25 do begin
reis:=random(3)+8;
if random(100)>3 then begin
for j:=1 to reis do begin
mon:=(random(91)+30)*2.8+mon;
end;
end;
end;
writeln(mon:5:0);
end.