Даны три вещественных числа. Вывести на экран те ,которые являются четными
SeaKate:
Забыла написать, что числа вводятся через файл
Ответы на вопрос
Ответил BobbyFresnel
1
===== PascalABC.NET =====
begin
ReadAllLines('MyFile.txt')
.Select(p -> p.ToReal)
.Where(p -> (Frac(p) = 0) and Trunc(p).IsEven)
.Println
end.
Приложения:
Новые вопросы
Українська мова,
1 год назад
Химия,
1 год назад
Биология,
1 год назад
Математика,
1 год назад
Українська мова,
6 лет назад