Question

Se da un numar n. Sa se verifice daca n este : a ) divizibil cu 3 b) divizibil cu 2 si cu 3 c) divizibil cu 3 sau cu 4. d) nu este divizibil nici cu 3 nici cu 4 . Va rog mult in PASCAL, am incercat deja dar nu stiu de ce imi da eroare ... MULTUMESC ANTICIPAT !

Answer 1

Răspuns:

program conditii;

var n:integer;

begin

 Write('numar intreg, n='); Read(n);

 Writeln('a) este divizibil cu 3: ', n mod 3=0);

 Writeln('b) este divizibil cu 2 sau cu 3: ', (n mod 2=0)or(n mod 3=0));

 Writeln('c) este divizibil cu 3 sau cu 4: ', (n mod 3=0)or(n mod 4=0));

 Writeln('d) nu este divizibil nici cu 3 si nici cu 4: ', not ((n mod 3=0)or(n mod 4=0)));

end.

Explicație: