Везде используется язык PascalABC.NET 3.2
1)
begin
print(readSeqInteger(3).Average)
end.
Пример ввода: 22 25 28
Пример вывода: 25
2)
begin
print(2*readreal <= readreal ? 'da' : 'net') <br>end.
Пример ввода: 7 13
Пример вывода: net
Пример ввода: 7 15
Пример вывода: da
3)
begin
print(readSeqInteger(12).Where(x ->Odd(x)).Average)
end.
Пример ввода:
1 2 3 4 5 6 7 8 9 10 11 12
Пример вывода:
6