по введенному числу n напечатать название фигуры

@ObLivion2346 · Регистрация: 20.02.2017

Author24 — интернет-сервис помощи студентам

Дано целое число n, соответсвующее количеству углов геометрической фигуры. Составить программу, которая по введенному числу n печатает название фигуры (например, при n = 3 программа напечатает треугольник, при n=5 пятиугольник, при n>8 многоугольник. В случае если вводится число меньше 2, выводится сообщение об ошибке!
Это что-то сложное!

@Sasha_Smirnov · 21.02.2017, 03:33

Вот пожалуйста: вводите любое n (если очень длинное, то в кавычках) и смотрите ответ.

Visual Basic

Sub N_угольник()
Const n = 3
If Not IsNumeric(n) Then Exit Sub
 
    Select Case n
    Case Is < 3 'ничего не сообщаем; а можем попросить изменить n
    Case Is < 4: MsgBox "треугольник"
    Case Is < 5: MsgBox "четырёхгольник"
    Case Is < 6: MsgBox "пятиугольник"
    Case Is < 7: MsgBox "шестиугольник"
    Case Is < 8: MsgBox "семиугольник"
    Case Is < 9: MsgBox "восьмиугольник"
    Case Else: MsgBox Int(n) & "-угольник"
    End Select
 
End Sub

Сообщение от ObLivion2346

Это что-то сложное!

Буду использовать в своих ответах!

echs · 21.02.2017, 10:27

Sasha_Smirnov
Мне показалось, что в строке 13 что-то не так.
...
наверное мне показалось...

@ObLivion2346 0 / 0 / 0 Регистрация: 20.02.2017 Сообщений: 20
		1
	по введенному числу n напечатать название фигуры 21.02.2017, 02:33. Показов 1948. Ответов 2 Метки нет (Все метки) Дано целое число n, соответсвующее количеству углов геометрической фигуры. Составить программу, которая по введенному числу n печатает название фигуры (например, при n = 3 программа напечатает треугольник, при n=5 пятиугольник, при n>8 многоугольник. В случае если вводится число меньше 2, выводится сообщение об ошибке! Это что-то сложное! 0

echs Регистрация: 23.10.2013 Сообщений: 5,076 Записей в блоге: 8
	21.02.2017, 10:27	3
	Sasha_Smirnov Мне показалось, что в строке 13 что-то не так. ... наверное мне показалось... 1