Question

С клавиатуры вводится строка из двух слов, разделенных пробелом. Составьте программу, которая: а) преобразует первые буквы слов к верхнему регистру и вставляет восклицательный знак после каждого слова; б) преобразует первые буквы слов к верхнему регистру, меняет слова местами и вставляет после каждого слово вопросительный знак. Пример: а) начинается урок - Начинается! Урок! б) начинается урок - Урок? Начинается? (Паскаль)

Answer 1

Ответ:

а)

program za;

var s: string;

begin

readln(s);

s[1]:=UpCase(s[1]);

s[Pos(' ',s)+1]:=UpCase(s[Pos(' ',s)+1]);

Insert('!',s,Pos(' ',s));

Insert('!',s,Length(s)+1);

writeln(s);

end.

б)

program zb;

var s: string;

begin

readln(s);

s[1]:=UpCase(s[1]);

s[Pos(' ',s)+1]:=UpCase(s[Pos(' ',s)+1]);

Insert('? ',s,Length(s)+1);

Insert(Copy(s,1,Pos(' ',s)-1),s,Length(s)+1);

Delete(s,1,Pos(' ',s));

Insert('?',s,Length(s)+1);

writeln(s);

end.

Объяснение:

фото