• Помогите решить. никак не могу. Вернее немогу в Паскале написать.
    Дан алгоритм:
    Алгоритм
    сим; А; цел; X, K, M
    { Запросить А;
    X;=0
    Если {Часть (А, 2, 1)- Часть (А, 6, 1)) то
    {Делать от К:=1 до LEN(A)-2
    { Делать от M:-К+1 до LEN(А)-1
    {Если (Часть (А, К, 2)>Часть (А, М, 2))
    то
    }
    }
    }
    }
    После его исполнения переменная Х имеет значение 4. Значение, присвоенное переменной А после исполнения первого оператора в теле алгоритма, могло быть:
    1) ВАЛЕНТИНА 2) ГАЛИНА 3) ИРИНА 4) МАРИНА

Ответы 1

  • С предоставленным условием явные проблемы. Если взглянуть логически. то вероятное решение следующее:varX, K, M: integer;A: string;beginreadln(A);X:=0;if ( Copy(A, 2, 1) = Copy(A, 6, 1) ) then     for K:=1 to Length(A)-2 do         for M:=K+1 to Length(A)-1 do             if ( Copy(A, K, 2) > Copy(A, M, 2) ) then                 X:=X+1; writeln(X);end.
    • Автор:

      camryn
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years