Если среди трех чисел a, b, c имеется хотя бы одно четное, то найти максимальное число, иначе - минимальное. СРОЧНО!! ПОЖАЛУЙСТА АЛГОРИТМИЧЕСКИЙ ЯЗЫК

обнови чтобы увидеть

program trichisla;var a,b,c,g:integer;beginWriteln('Введите 3 числа через пробел');Readln(a,b,c);if (a mod 2 =0) or (b mod 2= 0) or (c mod 2=0) then beginif a>b then g:=a else g:=b;if g>c then g:=g else g:=c;endelseif a<b then g:=a else g:=b;if g<c then g:=g else g:=c;Writeln('Максимальное или минимальное: ',g);end.