а) Функция возвращает длину строки, k = 10
б) Возвращает 4 символа начиная с 4-го из строки Str1, s = ' ned'
в) Удаляет из Str1 2 символа начиная с4-го, Str1 будет = 'denedeli'
г) Вставляет Str1 в Str2 начиная с третьего сивола, Str1 не изменится, Str2 будет = 'deden nedeli'
д) Возвращает позицию Str1 в Str2. В Str2 нет Str1, значит функция вернет 0
Я бы создал онлайн игру с открытым миром, что то типо симса где можно создать персонажа и играть от первого лица как будто это реальная жизнь
Program Massiv;
Uses Crt;
var i,j:integer;
a: array[1..6,1..6] of integer;
begin
clrscr;
randomize;
for i:=1 to 6 do
begin
for j:=1 to 6 do
begin
a[i,j]:=random(101)-50;
end;
end;
for i:=1 to 6 do
begin
for j:=1 to 6 do
begin
write(a[i,j]:3);
end;
writeln;
end;
readkey;
end.
Просто взгляни на клавиатуру :)
"PgDn"