Напишите программу, которая в последовательность натуральных чисел определит значение наибольшего из всех нечетных введеный чисел. программа получает на вход целые числа, количество введеных чисел неизвестно, последовательность чисел заканчивается числом 0 (0 - признак окончания ввода, не входят в последовательность) . количество чисел не привышает 1000. введеные числа не привышают 30000. программа должна вывести одно число - наибольшее из всех нечеиных введеных чисел. пример работы программы: входные данные выходные данные 15 17 20 17 0
BEGIN
repeat
readln(x);
If (x mod 2>0) then
begin
if x>y then y:=x
end;
until x=0;
writeln(y)
END.