ввести возраст человека от 1 до 150 лет и вывести его

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

Задать свой вопрос
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.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт