С клавиатуры вводится строка, содержащая три слова, разделённые пробелом.
Напишите программу, которая меняет местами второе и третье слово. Lazarus

Program P4;type A:array[1..30] of char;var c:string[30];begin  Writeln('Введите слова через пробел');  Readln(c[1..10], c[11..20], c[21..30]);  Writeln('Результат');  Writeln(c[1..10], c[21..30], c[11..20]);end.P.S.Может быть неверно.