var
a,b,i: integer;
begin
writeln ('введи два числа');
read (a,b);
if a>b then writeln (a,'большее число')
else
writeln (b,'большее число')
end.
Даны 2 числа, если первое больше второго, тогда записать в переменную С значение первого числа, если нет, второго числа и вывести его
Начало
А>B?
---ДА: C:=A
---НЕТ: С:=В
Вывести переменную С
В массив b заносятся нечетные числа из массива а. Значит, будет напечатано:
15,3,7