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

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

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

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

Глагол: почивает.

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.