Товар стоит a руб. b коп. за него заплатили c руб. d коп. сколько сдачи требуется получить? программа паскаль

Program CrazyCoder;
var a,b,c: real;
begin
write('Введите число "A": ');
readln(a);
writeln('Введите число "B": ');
readln(b);
c:=a-b;
write('Сдача: ', c);
end.