Question

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

Answer 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.

Answer 2

Вот пример программы на языке Python, которая решает данную задачу:

pythonCopy code
A = int(input("Введите количество воробьев: "))
B = int(input("Введите количество синиц: "))
C = int(input("Введите количество снегирей: "))
D = int(input("Введите количество ворон: "))

total_birds = A + B + C + D

if total_birds % 10 == 1 and total_birds % 100 != 11:
    bird_word = "птица"
elif total_birds % 10 in [2, 3, 4] and total_birds % 100 not in [12, 13, 14]:
    bird_word = "птицы"
else:
    bird_word = "птиц"

output = str(total_birds) + " " + bird_word
print(output)

Программа запрашивает у пользователя количество птиц каждого вида и вычисляет общее количество птиц (total_birds). Затем она проверяет окончание слова "птица" в зависимости от значения total_birds и формирует соответствующую строку вывода (output). Наконец, программа выводит итоговую строку на экран.