Составьте программу, которая из слова «НУМЕРАЦИЯ» составляет слова: «МЕРА», «РАЦИЯ», «РАНЕЦ»; - Turbo Pascal

Формулировка задачи:

Составьте программу, которая из слова «НУМЕРАЦИЯ» составляет слова: «МЕРА», «РАЦИЯ», «РАНЕЦ»;

Решение задачи: «Составьте программу, которая из слова «НУМЕРАЦИЯ» составляет слова: «МЕРА», «РАЦИЯ», «РАНЕЦ»;»

Листинг программы

var
  s: string;
 
begin
  s := 'НУМЕРАЦИЯ';
  Writeln(Copy(s, 3, 4));
  Writeln(Copy(s, 5, Length(s)));
  Writeln(Copy(s, 5, 2) + s[1] + s[4] + s[7]);
  Readln
end.

Объяснение кода листинга программы

В данном коде используется язык программирования Turbo Pascal.

Переменная s инициализируется строковым значением НУМЕРАЦИЯ.
Функция Copy(s, a, b) используется для копирования подстроки s от позиции a до позиции b включительно.
Выводится подстрока s, начиная с позиции 3 и заканчивая позицией 4 (Writeln(Copy(s, 3, 4))).
Выводится подстрока s, начиная с позиции 5 и до конца строки (Writeln(Copy(s, 5, Length(s)))).
Выводится подстрока s, начиная с позиции 5 и до позиции 2, затем добавляется первый символ s[1], затем символы s[4] и s[7], и все это выводится вместе (Writeln(Copy(s, 5, 2) + s[1] + s[4] + s[7])).
Программа завершается с помощью функции Readln().