ПОМОГИТЕ ПОЖАЛУЙСТА) 96....

Тема в разделе "Информатика", создана пользователем D.I.M.A., 2 янв 2010.

  1. D.I.M.A.

    D.I.M.A. New Member

    ПОМОГИТЕ ПОЖАЛУЙСТА) 96. Дано предложение, в котором имеются одна буква «с» и одна буква «т». Определить, какая из них встречается раньше (припросмотре слова слева направо). ЭТО ПАСКАЛЬ, СТРОКИ)
     
    D.I.M.A., 2 янв 2010
    #1
  2. alex7

    alex7 New Member

    var
    s:string;
    begin
    write ('Введите предложение: ');
    readln(s);
    if pos('с',s)>pos('т',s)
      then writeln ('Буква «т» встречается раньше')
      else writeln('Буква «с» встречается  раньше');
    end.
     
    alex7, 2 янв 2010
    #2

Поделиться этой страницей

Наша группа