Question

Se considera un numar natural N. Sa se scrie un program care determina daca ultima cifra a numarului N este divizibila cu 3.
In pascal .

Answer 1

Program exemplu;var a,n:longint;beginwriteln('Dati numarul N:');readln(n);a:=n mod 10;if a mod 3=0thenwriteln('Ultima cifra a numarului "',n,'" este "',a,'" si este divizibila cu 3!')elsewriteln('Ultima cifra a numarului "',n,'" este "',a,'" si nu este divizibila cu 3!');readln;end.