Можно ли вписать один из этих прямоугольников в другой - VB
Формулировка задачи:
Пользователь вводит с клавиатуры стороны двух прямоугольников(всего 4 значения). Разработать программу, определяющую можно ли вписать один из этих прямоугольников в другой(их можно переворачивать).
И еще вопрос: надо сделать проверку на правильность введенных значений, то есть если вводится символ или буква, должно выводиться сообщение "неверный ввод", однако, вместо этого программа просто вылетает. пробовала через isNumeric - не получилось. как решить эту проблему?
Решение задачи: «Можно ли вписать один из этих прямоугольников в другой»
textual
Листинг программы
Dim m(3) As Single, k As Integer = 0, s As String = "" For i As Integer = 0 To 1 For j As Integer = 0 To 1 m1: Console.WriteLine("Введите " & j + 1 & "-ю сторону " & i + 1 & "-й коробки") s = Console.ReadLine s = Replace(s, ".", ",") If Not IsNumeric(s) Then Console.WriteLine("Неверный ввод") : GoTo m1 Else m(k) = CSng(s) k += 1 Next Next 'теперь в массиве m() четыре значения Console.WriteLine("Введенные размеры " & m(0) & " " & m(1) & " " & m(2) & " " & m(3)) ' Далее определяйте что Вам надо Console.ReadLine()
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д