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

Question

Информатика

Петраша

20 сентября, 02:36

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

+5

Ответы (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.