Составьте программу ,определяющую ,на какую букву начинается второе слово в предложении.
Составьте программу ,определяющую ,на какую букву начинается второе слово в предложении.
Ответ(ы) на вопрос:
Если не рассматривать сложные предложения (наличие кавычек, скобок и т.д.), то так:
var
s:string;
n:integer;
begin
writeln('Введите предложение:');
readln(s);
n:=pos(' ',s);
writeln('Ответ: ',s[n+1])
end.
Не нашли ответ?
Похожие вопросы