Question

Программа на паскаль!

Answer 1

Program Str1;
VAR Words: STRING;

BEGIN
  Words := 'microsoft';
  Words[1] := UpCase (Words[1]);
  WriteLn(Words); {Выводится Microsoft'} 
END.