Дано действительное X.Составить программу с помощию которой определить является ли это число корнем уравнения 15x-10=0
Uses crt; var x:integer; begin readln(x); if 15*x-10=0 then writeln('Является') else writeln('Не является'); end.