profile
Опубликовано 4 года назад по предмету Информатика от SeRvErKrAuCh

Машина Тьюринга. Помогите пожалуйста решить. A={a,b,0,1}. Определить, является ли слово P идентификатором (непустым словом, начинающимся с буквы). Ответ: слово a (да) или пустое слово (нет).

  1. Ответ
    Ответ дан HRAshton
    var A: array [0..3] of string;
        i: integer;
    begin
         A[0] := 'a';
         A[1] := 'b';
         A[2] := '0';
         A[3] := '1';
         for i := 0 to 3 do
             if ((length(a[i]) > 0) and (a[i][1] in ['a'..'z', 'A'..'Z']))
                then writeln(A[i], '=> Yes') else writeln(A[i], '=> No');
    end.

    Вот, прошу Вас:))
Самые новые вопросы