|
Ответ: ПАНИКА: деление integer на integer с результатом real
Блджад! Есть же div.
var
a,b:real;
begin
a:= 5;
b:= 2;
drawstring(IntToStr(a div b),1,1);
repaint;
__________________
Retry, Abort, Ignore? █
Intel Core i7-9700 4.70 Ghz; 64Gb; Nvidia RTX 3070
AMD Ryzen 7 3800X 4.3Ghz; 64Gb; Nvidia 1070Ti
AMD Ryzen 7 1700X 3.4Ghz; 8Gb; AMD RX 570
AMD Athlon II 2.6Ghz; 8Gb; Nvidia GTX 750 Ti
|