Ответы на вопрос:
Input "a="; a min=a max=a input "b="; b if b< min then min=b if b> max then max=b input "c="; c if c< min then min=c if c> max then max=c s=a+b+c-max-min print "s="; s если речь идет о среднем арифметическом, то input "a="; a input "b="; b input "c="; c s=(a+b+c)/3 print "s="; s
Необходимо сравнить их бейсик не знаю вот в паскале накидал. думаю не много зная синтаксис бейсика проблем не будет. uses crt; var a,b,c,min,max,srednee: integer; begin writeln('введите 3 целых числа: '); read(a,b,c); ax: =a else max: =b; if c> max then max: =c; if a< b then min: =a else min: =b; if c< min then min: =c; srednee: =a+b+c-mn-mx; write('среднее число=',srednee); end.
A,b: integer; d: string[45]; begin setconsoleoutputcp(1251); writeln('введите число в диапазоне от 1 дo 100'); write('a='); readln(a); b: =a mod 10; a: =a div 10; case b of 0: d: =''; 1: d: ='i'; 2: d: ='ii'; 3: d: ='iii'; 4: d: ='iv'; 5: d: ='v'; 6: d: ='vi'; 7: d: ='vii'; 8: d: ='viii'; 9: d: ='ix'; end; b: =a mod 10; a: =a div 10; case b of 0: d: =''+d; 1: d: ='x'+d; 2: d: ='xx'+d; 3: d: ='xxx'+d; 4: d: ='xl'+d; 5: d: ='l'+d; 6: d: ='lx'+d; 7: d: ='lxx'+d; 8: d: ='lxxx'+d; 9: d: ='xc'+d; end; b: =a mod 10; a: = a div 10; case b of 0: d: =''+d; 1: d: ='c'+d; end; writeln('b римской системе счисления ' ,d); readln; end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Nicotenlove08.06.2020 17:19
-
janat850926.05.2021 17:38
-
vladkanter02.06.2023 17:37
-
hyyeblan557722.10.2022 01:31
-
АРТЁМ5556728.04.2020 06:57
-
Superclassehdh06.04.2020 09:44
-
богматематике08.12.2022 01:51
-
OBOShh18.03.2022 10:55
-
vanya199jj04.10.2021 17:52
-
frankovskaaalin21.05.2021 07:56
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.