Напишите дружественную по отношению к пользователю программу. Пусть она обращается к вам по имени, а затем предложит последовательно ввести прилагательное, существительное, наречие и глагол, чтобы в результате вывести на экран ...

var name, verb, abjective, noun, adverb: string; begin write('Введите ваше имя: '); readln(name); write('Хорошо, ', name, ', а теперь введите любое существительное: '); readln(noun); write('А теперь прилагательное: '); readln(abjective); write(name, ', введите наречие: '); readln(adverb); write('И последнее слово - глагол: '); readln(verb); writeln; writeln(abjective, ' летом ', noun, ' ', adverb, ' ', verb, ' около речки.' ); end.