Ввести возраст человека от 1 до 150 лет и вывести его вместе с последующим словом (год, года или лет).

Question

Информатика

Марат

16 февраля, 00:46

Ввести возраст человека от 1 до 150 лет и вывести его вместе с последующим словом (год, года или лет).

+4

Ответы (1)

Знаете ответ на вопрос?

Таиска · Answer 1

Var age:byte;

begin

read (age) ;

age:=age mod 10;

case age of

0,5,6,7,8,9: write ('лет') ;

1: write ('год') ;

2,3,4: write ('года') ;

end;

end.