К кормушке прилетели воробьи, синицы, снегири и вороны. Мальчик посчитал количество

К кормушке прилетели воробьи, синицы, снегири и вороны. Мальчишка посчитал количество птиц каждого вида. Напишите программу, которая запрашивает четыре числа количество птиц каждого вида, а потом сообщает общее число птиц у кормушки, дописывая к числовому значению слово птица в правильной форме. К примеру, 33 птицы, 11 птиц, 21 птица.
Входные данные: 4 естественных числа А,В,C,D ( А,В,С,D lt;=100).
Выходные данные: сумма переменных А,В,C,D и слово птица с согласованным окончанием.

Задать свой вопрос
1 ответ

// PascalABC.NET 3.4, сборка 1766 от 25.08.2018


begin

var s:=ReadArrInteger('Количество воробьев, синиц, снегирей и ворон',4).Sum;

Println(s,s mod 100 in [11..14]?'птиц':s mod 10=1?'птица':s mod 10 in [2..4]?'птицы':'птиц');

end.


, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт