Новые сообщения · Правила  
Страница 1 из 11
Модератор форума: Berestovskiy 
Форум ПРОГРАММИСТОВ » ПРОГРАММИРОВАНИЕ » Паскаль » Вывести на экран символ, предшествующий первому вхождению (работа в паскале со строками и символами)
Вывести на экран символ, предшествующий первому вхождению
Вывести на экран символ, предшествующий первомувхождению буквы «а» или сообщить о том, что буквы «а» нет в предложении.
1 | Автор: irsen22 | 2013-05-13, 09:12   |  Репутация: [ + 0 ]
var
s:string;
begin
readln(s);
if pos('a',s) = 0 then writeln('Буквы А нет в предложении') else
writeln(s[pos('a',s)-1]);
end.


Нужна помощь? Сюда: vkontakte.ru/berestovskiy
2 | Автор: Berestovskiy | 2013-05-13, 10:22   |  Репутация: [ + 211 ]
Форум ПРОГРАММИСТОВ » ПРОГРАММИРОВАНИЕ » Паскаль » Вывести на экран символ, предшествующий первому вхождению (работа в паскале со строками и символами)
Страница 1 из 11
Поиск: