Где здесь ошибка? Program Ylia; var A, B, C: real; Begin Readln (a, b) if a>b; C1=ab else C2=a/b; writeln (c); end.

Объявлена переменная С, зато в теле программы кроме С имеются переменные С1 и С2, которые будут ошибочными. Без них можно обойтись.

После readln (a, b) нет точки с запятой.

В условии "if a>b; C1=ab else C2=a/b" отсутствует служебное слово then.

Неправильно записаны операторы присваивания. Нужно было записать:

С: = А * В; С: = А / В.

Язык паскаль нечувствителен к изменению регистра в именах переменных, все же для читаемости лучше регистр не менять.

Program Ylia;

var A, B, C: real;

Begin

writeln ('Введите два числа через пробел');

Readln (A, B);

if A > B then C: = A * B

else C: = A / B;

writeln (C);

end.