разаработайте програму ** ЯЗЫКЕ ПАСКАЛЬ которая запарашивает три строковые...

Question

разаработайте програму НА ЯЗЫКЕ ПАСКАЛЬ которая запарашивает три строковые величины-взаимосвязаные прилагательное, существительное и глагол, а затем печатает все варианты фраз с использованием введеных слов.

Пример входных данных Пример выходных данных

ЗЕЛЕНЫЕ ЗЕЛЕНЫЕ ЛИСТЬЯ РАСПУСКАЮТСЯ

ЛИСТЬЯ ЗЕЛЕНЫЕ РАСПУСКАЮТСЯ ЛИСТЬЯ

РАСПУСКАЮТСЯ ЛИСТЬЯ ЗЕЛЕНЫЕ РАСПУСКАЮТСЯ

ЛИСТЬЯ РАСПУСКАЮТСЯ ЗЕЛЕНЫЕ

РАСПУСКАЮТСЯ ЗЕЛЕНЫЕ ЛИСТЬЯ

РАСПУСКАЮТСЯ ЛИСТЬЯ ЗЕЛЕНЫЕ

Answer 1

Сойдет? :

 

Program solution;
Uses Crt;
Var s1, s2, s3 : String;

Begin
ClrScr;
Write('1: ');
Readln(s1);
Write('2: ');
Readln(s2);
Write('3: ');
Readln(s3);

Writeln(s1, ' ', s2, ' ', s3);
Writeln(s1, ' ', s3, ' ', s2);
Writeln(s2, ' ', s1, ' ', s3);
Writeln(s2, ' ', s3, ' ', s1);
Writeln(s3, ' ', s1, ' ', s2);
Writeln(s3, ' ', s2, ' ', s1);
ReadKey;
End.