Здравствуйте решить задачу(pascal)!
Напишите программу, которая в последовательности натуральных чисел определяет сумму всех чисел, кратных 3 и оканчивающихся на 4. Программа получает на вход натуральные числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 5.
PascalABC.Net
begin
ReadSeqIntegerWhile(x -> x <> 5).Where(p -> (p mod 3 = 0) and (p mod 10 = 4)).Sum.Println;
end.