Можно ли вписать один из этих прямоугольников в другой - 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()
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д