Где здесь ошибка ??

Program Ylia ;

var A,B,C: real;

Begin

Readln (a,b)

if a>b;

C1=ab

else

C2=a/b;

writeln (c);

end.

Readln(a, b) ;
if a>b then c:=a*b
else c:=a/b;
writteln(c);
readln;
End.

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку