Найти max{min{a, b}, min{c, d}}. Напишите пожалуйста программу в VBA

Вопрос школьника по предмету Информатика

Найти max{min{a, b}, min{c, d}}. Напишите пожалуйста программу в VBA

Ответ учителя по предмету Информатика

Sub M1()

MsgBox (Application.Max( _

                                          Application.Min(InputBox(«Введите a»), _

                                                                    InputBox(«Введите b»)), _

                                          Application.Min(InputBox(«Введите c»), _

                                                                    InputBox(«Введите d»)) _

                                          ))

End Sub

Добавить комментарий

Ваш адрес email не будет опубликован. Обязательные поля помечены *

Похожие вопросы от пользователей