bonsoir
je dois écrire un programme en pascal qui demande à l'utilisateur d'écrire 2 nombre puis lui dit ci leur produit est positif ou négatif.
j'ai écris un programme mais ça complie pas.
svp pourriez vous m'aider?
program signeproduit;
uses wincrt;
var
m:integer;
n:integer;
begin
writeln('Ecrire deux nombre : ');
readln(m);
readln(n);
if(m>0 and n>0)or(m<0 and n<0) then
writeln('Leur produit est positif');
else
writeln('Leur produit es négatif');
end;
delay(100000);
end.
merci d'avance
-----
