Відповідь:
public static void Main(string[] args){
Console.WriteLine("Введите сообщение:");
string t=Console.ReadLine();
Console.WriteLine("Ваша строка до изменения:");
Console.WriteLine(t);
string[] s= t.Split(new char[]{' '},StringSplitOptions.RemoveEmptyEntries);
for(int i=0;i<s.Length;i++){
s[i] = (s[i].Substring(0,1).ToUpper()+s[i].Substring(1,s[i].Length-1));}
Console.WriteLine("Ваша строка после изменения:");
t=string.Join("",s);
Console.ReadKey(true);}
{Выводит узор из 100 произвольно размещенных окружностей произвольного
радиуса и цвета}
uses Graph;
var
grDriver:integer;
grMode: integer;
grPath:string;
ErrCode:integer;
x,y,r: integer; ( координаты центра и радиус окружности }
i: integer;
begin
grDriver:=VGA;
grMode:=VGAHi;
grPath:=' ';
InitGraph (grDriver,grMode,grPath);
ErrCode:=GraphResult;
if ErrCode <> grOk then
writeln ('Ошибка инициализации графического режима.1);
writeln ('Для завершения работы нажмите <Enter>');
readln;
Halt(l);
end;
Randomize;
for i:=l to 100 do
x:=Random(640);
y:=Random(480);
r:=Random(240);
Setcolor(Random(16));
Circle(x,y,r);
readin;
end.
Відповідь:
public static void Main(string[] args){
Console.WriteLine("Введите сообщение:");
string t=Console.ReadLine();
Console.WriteLine("Ваша строка до изменения:");
Console.WriteLine(t);
string[] s= t.Split(new char[]{' '},StringSplitOptions.RemoveEmptyEntries);
for(int i=0;i<s.Length;i++){
s[i] = (s[i].Substring(0,1).ToUpper()+s[i].Substring(1,s[i].Length-1));}
Console.WriteLine("Ваша строка после изменения:");
t=string.Join("",s);
Console.WriteLine(t);
Console.ReadKey(true);}
{Выводит узор из 100 произвольно размещенных окружностей произвольного
радиуса и цвета}
uses Graph;
var
grDriver:integer;
grMode: integer;
grPath:string;
ErrCode:integer;
x,y,r: integer; ( координаты центра и радиус окружности }
i: integer;
begin
grDriver:=VGA;
grMode:=VGAHi;
grPath:=' ';
InitGraph (grDriver,grMode,grPath);
ErrCode:=GraphResult;
if ErrCode <> grOk then
begin
writeln ('Ошибка инициализации графического режима.1);
writeln ('Для завершения работы нажмите <Enter>');
readln;
Halt(l);
end;
Randomize;
for i:=l to 100 do
begin
x:=Random(640);
y:=Random(480);
r:=Random(240);
Setcolor(Random(16));
Circle(x,y,r);
end;
readin;
end.