Ответ(ы) на вопрос:
Program Str1;
VAR Words: STRING;
BEGIN
Words := 'microsoft';
Words[1] := UpCase (Words[1]);
WriteLn(Words); {Выводится Microsoft'}
END.
Не нашли ответ?
Похожие вопросы