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

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.