Помогите составить программу в Паскале. Дан возраст человека мужского пола в годах....

Question

Помогите составить программу в Паскале. Дан возраст человека мужского пола в годах. Вывести на экран возрастную категорию: до года-младенец, от года до 11 лет-мальчик, от 12до 15 лет-подросток, от 16 до 25-юноша, от 26 до 50 лет-мужчина, более 60 лет-старик.

Comments

А между 50 и 60

---

как в условии было так я и написал) просто срочно надо

Answer 1

Var a:int64;
begin
read(a);
if a<1 then write('Этот человек - младенец')<br>       else if a<12 then write('Этот человек - мальчик')<br>                   else if a<16 then write('Этот человек - подросток')<br>                               else if a<26 then write('Этот человек - юноша')<br>                                           else if a<51 then write('Этот человек - мужчина')<br>                                                        else writeln('Этот человек - cтарик');
end.