ПОМОГИТЕ ПЛИЗ!!! СРОЧНО Найти ошибки в программеprogramm v3;VAR n,a,b,c:...

Question

ПОМОГИТЕ ПЛИЗ!!! СРОЧНО Найти ошибки в программеprogramm v3;VAR n,a,b,c: real;BEGINwrite('n -> '); readln(n);a:= n div 100;b:= n div 10;c:= n mod 10;if a*b*c < 10 then writeln('произведение больше 10'); else writeln('произведение меньше или равно 10');END.

Answer 1

1. В условии сказазано что если < 10, тогда вывести строку: "производное больше 10"... Логическая ошибка.

Answer 2

нельзя с переменными типа real использовать div и mod.