Merhaba arkadaşlar ben bir proje yaptım. Veritabanını access te yaptım ve delphiye bağladım. Ortalama hesaplatacağım ama bir türlü olmuyor

HATA TAM OLARAK: Incompatible types: 'Integer' and 'Real'

Kodlar

var x,y:real;
sonuc:real;

begin

x:=DataModule1.ADOTable7vize.Value;
y:=DataModule1.ADOTable7final.Value;
sonuc:=(x*0.4)+(y*0.6);

DataModule1.ADOTable7ortalama.Value:=sonuc; /// HATA SATIRI BURASI

if (sonuc>=90) or (sonuc<=100) then

begin
DataModule1.ADOTable7durum.Value:='GEÇTİ';
DataModule1.ADOTable7harf.Value:='AA';

end

else

begin
DataModule1.ADOTable7harf.Value:='AB'
end;

end;