Дан одномерный массив а(м). вывести массив на экран. найти среднее арифметическое положительных элементов. вывести результат на экран.

153

497

Посмотреть ответы 1

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

Weronika2017

Информатика

4,4(51 оценок)

Для создания графического интерфейса на форме размести пять кнопок с названиями сложение, вычитание, деление, умножение, выход; три текстовых поля (два для ввода и одно для вывода) . перед тем как начать основную работу можно убедиться, что калькулятор не будет складывать числа более 16 знаков. для этого необходимо в процедуре text1_change и text2_change ввести такой код: private sub text1_change () ‘происходит при изменении текстового поля if len (text1.text)> 16 then msgbox “много знаков” ‘если text1> 16, то выводим сообщение end sub private sub text2_change () if len (text2.text)> 16 then msgbox “много знаков” end sub теперь напишем код для сложения, вычитания и умножения: private sub command1_click () ‘сложение text3.text=val (text1.text) + val (text2.text) end sub private sub command2_click () ‘вычитание text3.text=val (text1.text) – val (text2.text) end sub private sub command3_click () ‘умножение text3.text=val (text1.text) * val (text2.text) end sub с кодом для деления придётся немного пораздумать. когда во втором текстовом поле будет ноль или там не будет текста, то будут выскакивать ошибка. для её предотвращения придётся создать условие: private sub command4_click () ‘деление if text2.text =”” then msgbox “деление на ноль” if text2.text = 0 then msgbox “деление на ноль” if text2.text< > ”” then text3.text=val(text1.text)/val(text2.text) if text2.text< > 0 then text3.text=val(text1.text)/val(text2.text) end sub осталось написать процедуру для кнопки «выход» : private sub command5_click () ‘выход end end sub для создания других операций с числами можно воспользоваться обозначениями функций: sqr (число) – служит для извлечения квадратного корня например: sqr (16) = 4 основание ^ степень – возведение числа в степень например: 6 ^ 2 = 36 sin (число) – синус числа например: sin (60) = -0, 304810621102217 cos (число) – косинус числа например: cos (60) = -0, 952412980415156 tan (число) –тангенс числа например: tan (60) = 0,320040389379563

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

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

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

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