Технологии

• Всего ответов: 1


Андрей FaceOff
1-й в Технологиях
4.8 93 отзыва
это на Visual Basic.Net
Module Module1
    Sub Main()
        Dim N As Integer
        Dim M As Integer
        Console.WriteLine(«Ведите N»)
        N = Console.ReadLine()
        Console.WriteLine(«Ведите M»)
        M = Console.ReadLine()
        For X = 1 To N
            If X * X = M Then
                Console.WriteLine(«X = » + X.ToString())
            End If
        Next
        Console.WriteLine(«Нажмите Enter для окончания»)
        Console.ReadLine()
    End Sub
End Module
июнь 4, 2012 г.

Похожие вопросы