Напишите программу, которая в последовательности натуральных чисел определяет максимальное число, кратное 7. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, кратное 7. Программа должна вывести одно число — максимальное число, кратное 7.
в паскале пожалуйста
p.s. учитель сам создавал задачу
Answers & Comments
Ответ:
// PascalABC.NET
begin
var N:integer;
write('N = ');
read(N);
ReadSeqInteger(N).Where(x -> x mod 7 = 0).Max.Print();
end.