Задание:
Составьте алгоритм для определения подходящего возраста кандидатуры для вступления в брак, используя следующее соображение: возраст девушки равенполовине возраста мужчины +7, возраст мужчины определяется соответственно как удвоенный возраст девушки-14.
Решение:
Var a, b: integer; begin write ('Введите пол (0 — ж, 1 — м) и возраст свой: '); readln (a, b); if (a=0) then writeln ('Возраст Вашего суженого (не советую под стандарты подстраиваться): ', b*2 — 14); if (a=1) then writeln ('Возраст Вашей будущей жены: ', b / 2+7); end. Такие дела=)
Знаете другой ответ?