Даны три вещественных числа. вывести на экран те ,которые являются четными

romaberduk03 romaberduk03    2   12.12.2019 09:48    0

Ответы
niksustokarev niksustokarev  10.10.2020 20:10

===== PascalABC.NET =====

begin

 ReadAllLines('MyFile.txt')

     .Select(p -> p.ToReal)

     .Where(p -> (Frac(p) = 0) and Trunc(p).IsEven)

     .Println

end.


Даны три вещественных числа. вывести на экран те ,которые являются четными
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика