Здравствуйте, помогите написать код к задаче на делфи. Задача: Надано два числа A и Y. Если А>Y то вычеслить х=А/100, если А

Так понимаю, консольный Delphi - это Pascal?)

var x, y, a, k: real;

begin

readln (a, y);

if (a > y) then

begin

x : = a / 100;

writeln (x);

end;

if (a < y) then

begin

k : = 100 * abs (a);

writeln (k);

end;

end.