Разработайте программу которая запрашивает три строковые величины - взаимосвязанные прилагательное,существительное и глагол .а затем печатает все варианты фраз с использованием введенных слов

Var a,b,c:string;
begin
write(Введите галагол, );
readln(a);
write(Введите прил., );
readln(b);
write(Введите сущ., );
readln(c);
writeln(b, ,c, ,a);
writeln(b, ,a, ,c);
writeln(a, ,b, ,c);
writeln(a, ,c, ,b);
writeln(c, ,a, ,b);
writeln(c, ,b, ,a);
end.