Помогите пожалуйста решить задачу в Microsoft Visual Studio 2005

[Tanyav]

Помогите пожалуйста решить задачу в Microsoft Visual Studio 2005

Помогите пожалуйста решить задачу,завтра сдавать,а я совершенно не понимаю(((
Вывести последовательность символов ZYYXXX...AA...A.
или
Заполнить одномерный массив только гласными буквами из введенного текста.

 

[KiD2]

А если поточнее какой вариант желательнее и в консольном режиме нужно или в окошке... И на каком языке программирования С#, С++, VB...

 

[Tanyav]

любой,какой вам больше нравится.
наверное в окошке.
в Microsoft Visual Studio 2005.

 

[KiD2]

Держите :tehnari_ru_250:
Кому интересно основной код (Visual Studio 2005 C#):

        private void button1_Click(object sender, EventArgs e)
        {
            int i;

            richTextBox1.Text = "Ответ: ";
            for(i=0;i<27;i++)
                for (int j = i; j > 0; j--)
                    richTextBox1.Text += Convert.ToChar(91 - i);
        }

        private void button2_Click(object sender, EventArgs e)
        {
            string a="аыеёиоуэюяАЫЕЁИОУЭЮЯeyuioaEYUIOA";
            textBox2.Text="";
            string[] b;
           
            for(int i=0;textBox1.Text.Length>i;i++)
                if(a.IndexOf(textBox1.Text[i])!=-1)
                    textBox2.Text+=textBox1.Text[i];

            char[] mas = textBox2.Text.ToCharArray();
        }

 

[Tanyav]

а чтобы в VB что надо поменять?

 

[KiD2]

Программу нужно поменять всю (хоть и будет она похоже) А что в VB надо? Я же спрашивал в чем

 

[Tanyav]

ага,извини,просто я сначало не поняла
я в этом особо не понимаю..(

 

[KiD2]

Держи VB и смотри что пришлось изменять :tehnari_ru_160:

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim i, j As Integer

        RichTextBox1.Text = "Ответ: "
        For i = 0 To 27
            For j = 0 To i
                RichTextBox1.Text = RichTextBox1.Text + Convert.ToChar(91 - i)
            Next j
        Next i
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Dim a As String
        Dim b() As Char
        Dim j, i As Integer

        a = "аыеёиоуэюяАЫЕЁИОУЭЮЯeyuioaEYUIOA"
        TextBox2.Text = ""
        j = 0
        For i = 0 To TextBox1.Text.Length - 1

            If (a.IndexOf(TextBox1.Text(i)) <> -1) Then
                TextBox2.Text += TextBox1.Text(i)
            End If
        Next i
        b = TextBox2.Text.ToCharArray()
    End Sub
End Class

 

[Tanyav]

УРА!!!!))))
спасибочки
знал бы ты как ты меня выручил.
а это про массивы ведь??

 

[KiD2]

Это оба задания :tehnari_ru_244: Какое не нужно можешь удалить а можешь оба сдать

 

[Tanyav]

я даже не думала,что можно получить реальную помощь)

 

[Tanyav]

ого)
спасибо,что помогаете таким умникам как мы))))