Вводиться возрост человека на paskale программа определяет статус человека то ист(школьник школьник )

1

Ответы и объяснения

2014-01-25T19:40:05+00:00
Program gt;
var n:integer;
begin
read(n);
if(n<=5)then writeln('ребенок');
if(n>5)and(n<=14)then writeln('дитя');
if(n>14)and(n<=16)then writeln('подросток');
if(n>16)and(n<=18)then writeln('совершенолетный');
if(n>18)and(n<=27)then writeln('молодой человек');
if(n>27)and(n<=50)then writeln('мужчина');
if(n>50)and(n<150)then writeln('старик');
end.