Срочноо помогите с дз по информатике

На PascalABC:

Var St : string; Len : integer;
begin
St := 'программирование'; Len := Length (St);
WriteLn (' Третий символ: ' , St[3]);
WriteLn (' Предпоследний символ: ' , St[Len-1]);
Write (' Первые пять символов: ');
for var i := 1 to 5 do Write (St[i]); WriteLn;
Write (' Строка кроме двух последних символов: ');
for var i := 1 to (Len - 2) do Write (St[i]); WriteLn;
Write (' Строка c четными номерами символов: ');
for var i := 1 to (Len) do if (i mod 2 = 0) then Write (St[i]); WriteLn;
Write (' Строка c нечетными номерами символов: ');
for var i := 1 to (Len) do if (i mod 2 <> 0) then Write (St[i]); WriteLn;
Write (' Все символы в обратном порядке: '); for var i := Len downto 1 do
Write (St[i]); WriteLn;
end.

```python
s = "программирование"

print(s[2]) # третий символ этой строки
print(s[-2]) # предпоследний символ этой строки
print(s[:5]) # первые пять символов этой строки
print(s[:-2]) # всю строку, кроме последних двух символов
print(s[::2]) # все символы с четными индексами
print(s[1::2]) # все символы с нечетными индексами
print(s[::-1]) # все символы в обратном порядке
```

Напише. 300р.

Вот на Visual Basic:

 Sub Main() 

    Dim s As String 

    s = "программирование" 

     

    Console.WriteLine("1. " & s(2)) ' выводим третий символ 

    Console.WriteLine("2. " & s(Len(s) - 1)) ' выводим предпоследний символ 

    Console.WriteLine("3. " & Left(s, 5)) ' выводим первые пять символов 

    Console.WriteLine("4. " & Left(s, Len(s) - 2)) ' выводим всю строку, кроме последних двух символов 

    Console.WriteLine("5. " & s(0) & Mid(s, 2, Len(s) - 1 Step 2)) ' выводим символы с четными индексами 

    Console.WriteLine("6. " & Mid(s, 2, Len(s) - 1 Step 2)) ' выводим символы с нечетными индексами 

    Console.WriteLine("7. " & StrReverse(s)) ' выводим строку в обратном порядке 

End Sub  

Вот пример программы на языке Python, которая решает данную задачу, используя срезы:

python
string = "программирование"

# выводим третий символ строки
print(string[2])

# выводим предпоследний символ во второй строке
print(string[-2])

# выводим первые пять символов в третьей строке
print(string[:5])

# выводим всю строку, кроме последних двух символов, в четвертой строке
print(string[:-2])

# выводим все символы с четными индексами в пятой строке
print(string[::2])

# выводим все символы с нечетными индексами в шестой строке
print(string[1::2])

# выводим все символы в обратном порядке в седьмой строке
print(string[::-1])
Результат выполнения программы будет следующим:

о
е
прогр
программирован
пормиовн
ргамиое
енивориммаргорп