87

Нужно написать программу в паскале. Задача: введите возраст человека от 1 до 150 и…

16 марта 2023

Нужно написать программу в паскале. Задача: введите возраст человека от 1 до 150 и выведите его вместе со словом"год» ,"года» , лет» .

категория: информатика



78

vara: byte; beginreadln (a); if (a<11) or (a>14) and (a<110) or (a>114) and (a mod 10<5) and (a mod 10>1) thenwriteln (a,' года') elseif (a mod 10=1) and (a<>11) and (a<>111) thenwriteln (a,' год') elsewriteln (a,' лет'); readln; end.

Знаете ответ?


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