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

Пример для ввода:

Прилагательное: черная.

Существительное: кошка.

Глагол: спит.

program word;

var s1, s2, s3: string;

begin

writeln ('Введите прилагательное ');

Readln (s1);

writeln ('Введите существительное ');

Readln (s2);

writeln ('Введите глагол ');

Readln (s3);

writeln ();

writeln (s1, ' ', s2, ' ', s3);

writeln (s1, ' ', s3, ' ', s2);

writeln (s2, ' ', s1, ' ', s3);

writeln (s2, ' ', s3, ' ', s1);

writeln (s3, ' ', s1, ' ', s2);

writeln (s3, ' ', s2, ' ', s1)

end.