Проект-заготовку для решения задания String9 можно создать с помощью модуля PT4Load. В созданный проект будет входить файл с именем String9; его расширение зависит от выбранного языка: .cs для C# и .vb для VB.NET. Приведем текст процедуры Solve из данного файла (именно в эту процедуру требуется ввести решение задания):

[C#]

public static void Solve()
{
    Task("String9");
}

[VB.NET]

Sub Solve()
    Task("String9")
End Sub

После запуска программы на экране появится окно задачника. На рисунке приводится вид этого окна в случае использования языка C#.

Данные символьного и строкового типа в окне задачника заключаются в кавычки; это позволяет, в частности, отличить числовые данные (например, 2) от символьных и строковых данных, содержащих цифры (например, строки "2"). Кроме того, кавычки дают возможность увидеть пробелы, находящиеся в начале или в конце строк.

Ввод исходных данных

Добавим в процедуру Solve фрагмент, обеспечивающий ввод исходных данных. При этом будем учитывать, что данные символьного типа надо вводить с помощью функции GetChar, а данные целого типа — с помощью функции GetInt:

[C#]

public static void Solve()
{
    Task("String9");
    char c1 = GetChar(), c2 = GetChar();
    int n = GetInt();
}

[VB.NET]

Sub Solve()
    Task("String9")
    Dim c1 As Char = GetChar(), c2 As Char = GetChar()
    Dim n As Integer = GetInt()
End Sub

Мы намеренно ввели данные не в том порядке, в котором они указаны в окне задачника.

Запуск нового варианта программы уже не будет считаться ознакомительным, поскольку в программе выполняется ввод исходных данных. Так как порядок ввода исходных данных является ошибочным, этот вариант решения будет признан неверным и приведет к сообщению «Неверно указан тип при вводе исходных данных. Для ввода 1-го элемента (целого типа) использована переменная символьного типа».

Напомним правило, определяющее порядок ввода и вывода данных для задачника Programming Taskbook: ввод и вывод данных производится по строкам (слева направо), а строки просматриваются сверху вниз.

Исправим процедуру Solve, изменив в ней порядок ввода исходных данных:

[C#]

    int n = GetInt();
    char c1 = GetChar(), c2 = GetChar();

[VB.NET]

    Dim n As Integer = GetInt()
    Dim c1 As Char = GetChar(), c2 As Char = GetChar()

Теперь исходные данные вводятся правильно. Однако из-за того что в программе отсутствует вывод результирующих данных, решение снова будет признано ошибочным; при этом на информационной панели появится сообщение «Выведены не все результирующие данные. Количество выведенных данных: 0 (из 1)»

Формирование требуемой строки и ее вывод

Для формирования нужной строки воспользуемся операцией сцепления строк («+» в языке C#, «&» в языке VB.NET), после чего выведем полученную строку методом Put:

[C#]

public static void Solve()
{
    Task("String9");
    int n = GetInt();
    char c1 = GetChar(), c2 = GetChar();
    string s = "";
    for (int i = 0; i < n; i++)
        s = s + c1 + c2;
    Put(s);
}

[VB.NET]

Sub Solve()
    Task("String9")
    Dim n As Integer = GetInt()
    Dim c1 As Char = GetChar(), c2 As Char = GetChar()
    Dim s As String = ""
    For i As Integer = 1 To n
        s = s & c1 & c2
    Next
    Put(s)
End Sub

В варианте для VB.NET обратите внимание на новую для языка Visual Basic возможность описания переменной цикла непосредственно в заголовке цикла.

При выполнении этой программы в области результатов будет выведена строка, оканчивающаяся особым символом — красной звездочкой, например:

"a1a1a1a1a1*

Красная звездочка, расположенная в конце строки, отображаемой на экране, означает, что длина полученной строки превышает длину контрольной (т. е. «правильной») строки. Для того чтобы увидеть на экране всю полученную строку, достаточно подвести курсор мыши к строке со звездочкой; при этом полный текст строки появится во всплывающей подсказке.

Примечание. Красная звездочка может появиться и при выводе ошибочных числовых данных. Например, если ожидается целое число в диапазоне от 1 до 99, а получено число 10000, то на экран будет выведена только первая цифра этого числа, за которой будет указана красная звездочка: 1*.

Правильное решение, его тестирование и просмотр результатов

Ошибка в предыдущей программе возникла из-за неверного указания количества итераций цикла. Действительно, на каждой итерации к строке добавляется по два символа, поэтому после n итераций строка будет содержать 2n символов (а не n, как требуется в задании).

Для исправления ошибки достаточно вдвое уменьшить число итераций, изменив заголовок цикла следующим образом (обратите внимание на использование операции целочисленного деления \ в заголовке цикла для языка VB.NET):

[C#]

    for (int i = 0; i < n / 2; i++)

[VB.NET]

    For i As Integer = 1 To n \ 2

После запуска исправленной программы мы получим сообщение «Верное решение. Тест номер 1 (из 5)», а после пяти подобных запусков — сообщение «Задание выполнено!». С помощью команды меню «Tools | PT4 Results» мы можем вывести на экран окно результатов, в котором будут перечислены все наши попытки решения задания (заглавная буква «S», которая указывается перед датой, означает, что при выполнении задания использовался язык C# — «C Sharp»):

String9   S24/03 11:37 Ознакомительный запуск.
String9   S24/03 11:48 Неверно указан тип при вводе исходных данных.
String9   S24/03 11:49 Выведены не все результирующие данные.
String9   S24/03 11:49 Ошибочное решение.
String9   S24/03 11:52 Задание выполнено!

В случае выполнения задания на языке VB.NET перед датой указывается буква «B» — «Basic» (для обозначения языков платформы .NET в окне результатов используются заглавные буквы).

Примечание. С использованием класса StringBuilder задачу можно решить, заполняя требуемую строку посимвольно. Приведем полный текст файлов String9.cs и String9.vb с соответствующим вариантом решения:

[String9.cs]

using System;
using System.Text;
using PT4;

namespace PT4Tasks
{
    public class MyTask: PT
    {
        public static void Solve()
        {
            Task("String9");
            int n = GetInt();
            char c1 = GetChar(), c2 = GetChar();
            StringBuilder s = new StringBuilder(n);
            s.Length = n;
            for (int i = 0; i < n / 2; i++)
            {
                s[2 * i] = c1;
                s[2 * i + 1] = c2;
            }
            Put(s.ToString());
        }
    }
}

[String9.vb]

Option Strict On
Imports System
Imports System.Text

Imports PT4.PT
Module PT4Tasks
    Sub Solve()
        Task("String9")
        Dim n As Integer = GetInt()
        Dim c1 As Char = GetChar(), c2 As Char = GetChar()
        Dim s As New StringBuilder(n)
        s.Length = n
        For i As Integer = 0 To n \ 2 - 1
            s(2 * i) = c1
            s(2 * i + 1) = c2
        Next
        Put(s.ToString())
    End Sub
End Module

Следует обратить внимание на указание в начале программы пространства имен System.Text (в котором описан класс StringBuilder), а также на преобразование объекта s к «обычному» строковому типу string при его выводе (если попытаться вывести результат без такого преобразования, т. е. в виде Put(s), то задачник выведет сообщение об ошибке «В методе Put указан параметр недопустимого типа StringBuilder»).

В конструкторе StringBuilder указывается переменная n; это позволяет задать емкость строки s (т. е. размер массива символов, используемого для хранения данной строки). Однако длина созданной строки s (т. е. количество фактически содержащихся в ней символов) остается равной 0, и для того чтобы положить ее равной нужной длине, требуется изменить свойство s.Length. Необходимость использования класса StringBuilder объясняется тем, что обычные строки (типа string) являются неизменяемыми; в частности, их символы и свойство Length доступны только для чтения.

Разработка сайта:
М. Э. Абрамян, В. Н. Брагилевский

Последнее обновление:
11.10.2011