16342
Сборник задач по программированию. Старая версия
Приходько А. Н.
Visual Basic. B.12. Гнездо задач. Строки
Калькулятор / - деление \ - остаток S - сумма чисел от и до P - произведение чисел от и до
Калькулятор
/ - деление
\ - остаток
S - сумма чисел от и до
P - произведение чисел от и до
B.12.1 Ответы Паскаль-аналог Java-аналог Определить значение, выдаваемое функцией AA. Function AA() As Integer Stri = "a" For i = 1 To 4 Stri = Stri + Stri Next i Man = Len(Stri) AA = Man End Function
B.12.1 Ответы Паскаль-аналог Java-аналог
Определить значение, выдаваемое функцией AA.
Function AA() As Integer Stri = "a" For i = 1 To 4 Stri = Stri + Stri Next i Man = Len(Stri) AA = Man End Function
B.12.2 Ответы Паскаль-аналог Java-аналог Определить значение, выдаваемое функцией AA. Function AA() As String a = "a" b = "b" For k = 1 To 3 a = a + b b = b + a Next k AA = b End Function
B.12.2 Ответы Паскаль-аналог Java-аналог
Function AA() As String a = "a" b = "b" For k = 1 To 3 a = a + b b = b + a Next k AA = b End Function
B.12.3 Ответы Паскаль-аналог Определить значение, выдаваемое функцией AA. Function AA() As String a = "a" b = "b" Do a = a + b b = b + a Loop Until Len(b) > 5 AA = b End Function
B.12.3 Ответы Паскаль-аналог
Function AA() As String a = "a" b = "b" Do a = a + b b = b + a Loop Until Len(b) > 5 AA = b End Function
B.12.4 Ответы Паскаль-аналог Определить значение, выдаваемое функцией AA. Function AA() As String a = "a" b = "b" Do a = a + b b = b + a Loop Until Len(b) > 2 * Len(a) AA = b End Function
B.12.4 Ответы Паскаль-аналог
Function AA() As String a = "a" b = "b" Do a = a + b b = b + a Loop Until Len(b) > 2 * Len(a) AA = b End Function
B.12.5 Ответы Паскаль-аналог Определить значение, выдаваемое функцией AA. Function AA() As Integer a = "a" b = "b" Do For k = 1 To Len(b) a = a + a Next k For k = 1 To Len(a) b = b + b Next k Loop Until Len(b) > 100 Man = Len(b) AA = Man End Function
B.12.5 Ответы Паскаль-аналог
Function AA() As Integer a = "a" b = "b" Do For k = 1 To Len(b) a = a + a Next k For k = 1 To Len(a) b = b + b Next k Loop Until Len(b) > 100 Man = Len(b) AA = Man End Function
B.12.6 Ответы Паскаль-аналог Java-аналог Определить значение, выдаваемое функцией AA. Function AA() As String b = "" For k = 1 To 5 b = b + Chr(Asc("b") + Len(b)) Next k AA = b End Function
B.12.6 Ответы Паскаль-аналог Java-аналог
Function AA() As String b = "" For k = 1 To 5 b = b + Chr(Asc("b") + Len(b)) Next k AA = b End Function
B.12.7 Ответы Паскаль-аналог Java-аналог Определить значение, выдаваемое функцией AA. Function AA() As String a = "abcdef" b = "" For k = 1 To 3 b = b + Mid(a, k * 2 - 1, 1) Next k AA = b End Function
B.12.7 Ответы Паскаль-аналог Java-аналог
Function AA() As String a = "abcdef" b = "" For k = 1 To 3 b = b + Mid(a, k * 2 - 1, 1) Next k AA = b End Function
B.12.8 Ответы Паскаль-аналог Java-аналог Определить значение, выдаваемое функцией AA. Function AA() As String b = "" For ch = Asc("a") To Asc("f") b = b + Chr(ch) Next ch AA = b End Function
B.12.8 Ответы Паскаль-аналог Java-аналог
Function AA() As String b = "" For ch = Asc("a") To Asc("f") b = b + Chr(ch) Next ch AA = b End Function
B.12.9 Ответы Паскаль-аналог Java-аналог Определить значение, выдаваемое функцией AA. Function AA() As String b = "b" For k = 1 To 3 b = "a" + b + "a" Next k AA = b End Function
B.12.9 Ответы Паскаль-аналог Java-аналог
Function AA() As String b = "b" For k = 1 To 3 b = "a" + b + "a" Next k AA = b End Function
B.12.10 Ответы Паскаль-аналог Java-аналог Определить значение, выдаваемое функцией AA. Function AA() As String b = "b" For k = 1 To 3 b = b + "a" + b Next k AA = b End Function
B.12.10 Ответы Паскаль-аналог Java-аналог
Function AA() As String b = "b" For k = 1 To 3 b = b + "a" + b Next k AA = b End Function
B.12.11 Ответы Паскаль-аналог Java-аналог Определить значение, выдаваемое функцией AA. Function AA() As String b = "b" For k = 1 To 2 b = Left(b, 1) + Right(b, 1) + b Next k AA = b End Function
B.12.11 Ответы Паскаль-аналог Java-аналог
Function AA() As String b = "b" For k = 1 To 2 b = Left(b, 1) + Right(b, 1) + b Next k AA = b End Function
B.12.12 Ответы Паскаль-аналог Java-аналог Определить значение, выдаваемое функцией AA. Function AA() As String b = "abc" For k = 1 To 2 b = b + Mid(b, k, 1) Next k AA = b End Function
B.12.12 Ответы Паскаль-аналог Java-аналог
Function AA() As String b = "abc" For k = 1 To 2 b = b + Mid(b, k, 1) Next k AA = b End Function
B.12.13 Ответы Паскаль-аналог Java-аналог Определить значение, выдаваемое функцией AA . Function AA() As Integer Stri = "bb" For i = 1 To 5 Stri = Stri + Stri Next i AA = Len(Stri) End Function Гнездо B.13. Задачи на подстановку.
B.12.13 Ответы Паскаль-аналог Java-аналог
Определить значение, выдаваемое функцией AA .
Function AA() As Integer Stri = "bb" For i = 1 To 5 Stri = Stri + Stri Next i AA = Len(Stri) End Function Гнездо B.13. Задачи на подстановку.
© Александр Приходько 1996 - 2006