Что не так в программе, она должна узнать какое число вот программа program primer; var a,b,с: integer; begin readln (a,b,с); if a> b then writeln(a) else if b> c writeln (b) else if c> a writeln (c); end.

У меня вот такая программа получилась:

var

a,b:integer;

begin

write('Введите в одной строке два целых числа и нажмите <Enter> ');

readln(a,b);

if a=b then writeln('числа равны')

else 

if a>b then writeln(a,' больше')

else writeln(b,' больше')

end.

If a>b then write(a)
нехорошо, так как может оказаться что с больше обоих, тогда вместо с печатается неверный ответ а

надо доп проверку

if a>b then
   if a>c then
       write(a)
   else write(c)
else
     if b>c then  write(b)
     else write(c)

*только разумеется тут надо поправить правильность написания кода))