Запросите и введите с клавиатуры имя пользователя, имя его друга (подруги) и суть отношений между ними (дружба, любовь).

Напечатайте на экране:

+=

помогите на паскале

Question

Информатика

Варсоноф

17 марта, 06:31

Запросите и введите с клавиатуры имя пользователя, имя его друга (подруги) и суть отношений между ними (дружба, любовь).

Напечатайте на экране:

+=

помогите на паскале

+3

Ответы (1)

Знаете ответ?

Никиша · Answer 1

Program Question;

var

nameF, nameS, rels : string;

Begin

Write ('Введите первое имя: ') ;

Readln (nameF) ;

Write ('Введите второе имя: ') ;

Readln (nameS) ;

Write ('Введите отношения: ') ;

Readln (rels) ;

Writeln (nameF, '+', nameS, '=', rels) ;

End

Запросите и введите с клавиатуры имя пользователя, имя его друга (подруги) и суть отношений между ними (дружба, любовь).Напечатайте на экране:+=помогите на паскале