Создайте программу, которая будет симулировать бросок игрального кубика. каждый бросок будет генерироватся случайно число в депозоне [1,6]. кубик перекидывается n раз. после чего, программа выводит на экран сколько раз выпало каждое значение. и отдельно выводится информация о том, какое значение выпадало больше всего раз. n целое число, которое вводится с клавиатуры язык pascal and.net
248
458
Ответы на вопрос:
// pascalabc.net 3.3, сборка 1625 от 17.01.2018 // внимание! если программа не работает, обновите версию! begin var a: =arrrandom(readinteger('n='),1,6); a.println; var s: =a.groupby(t-> t).select(t-> (t.key,t.(t-> t[0]); s.println; var max: =s.maxby(t-> t[1]); writeln('наиболее частое значение: ',max[0]) end. пример n= 50 1 2 5 5 4 2 5 3 5 3 5 5 5 4 2 4 3 3 3 3 6 6 5 4 2 5 5 5 4 5 3 1 5 1 1 3 6 2 6 6 5 2 6 5 2 5 5 5 6 5 (1,4) (2,7) (3,8) (4,5) (5,19) (6,7) наиболее частое значение: 5
На паскале: var a,d,c,k: integer; begin writeln('vvedite znachenie peremennoj a'); readln(a); writeln('vvedite znachenie peremennoj d'); readln(d); writeln('vvedite znachenie peremennoj c'); readln(c); writeln('vvedite znachenie peremennoj k'); readln(k); res: =(a+(d-12)*3)*(c-5*k); writeln('(a+(d-12)*3)*(c-5*k)=',res); readln; end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
irinagerasimova103.03.2023 01:02
-
byrzakovskaya07.10.2022 22:17
-
Karcat230605.09.2021 09:07
-
maarusya06.05.2023 00:13
-
Mesakea20.12.2021 00:26
-
Dan1yar225506.01.2021 09:33
-
karina84528.02.2022 21:43
-
микс11111109.04.2020 06:21
-
furymalice09.05.2023 17:32
-
бека15027.11.2022 08:04
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.