Регистрация
Вико1234
29.05.2021 15:44
Информатика
Есть ответ 👍

Двое бросают игральные кости. Кто чаще выигрывает: у кого выпадет 6 очков в сумме или 7? Напишем программу, моделирующую случайный эксперимент.
program costy;
var k,n,s,i,m1,m2:integer;
begin
randomize;
writeln('Введите количество испытаний');
readln(n);
for i:=1 to n do
begin
k:=random(6)+1; {бросание первой кости}
s:=random(6)+1; {бросание второй кости}
if k+s=7 then m1:=m1+1;
if k+s=6 then m2:=m2+1;
end;
writeln('частота выпадения в сумме 6 равна ', m1/n:2:2);
writeln('частота выпадения в сумме 7 равна ', m2/n:2:2);
end.
Бросание монеты будет аналогично выбору компьютером случайного числа в диапазоне 1..6. Это можно сделать с команды…………..
а) readln(n);
б) writeln('Введите количество испытаний');
в) for i:=1 to n do;
г) random(6)+1

295
380
Посмотреть ответы 2

Ответы на вопрос:

OwL505
OwL505
4,5(79 оценок)

г) random(6)+1

оооооченьТупой
оооооченьТупой
4,6(39 оценок)
1.a) 6.в) 7.б) 14.а)

Популярно: Информатика