Question

1. Se citesc trei numere a, b,c. Sa se afișeze ,pe 3 linii diferite, ultimele cifre ale lor.
2. Se citește un număr n. Sa se verifice daca este par si mai mare decât 100.
3. Se citește un număr n. Sa se verifice daca este in intervalul [100,500) . Mesaj "este"/ "nu este"

Answer 1

1)
var 

 a,b,c:integer;
 
begin

 read(a,b,c);
 
 writeln(a mod 10);
 writeln(b mod 10);
 writeln(c mod 10);

end.



2)
var

 n:integer;
 
begin

 read(n);
 
 if (odd(n)=False) and (n>100) then
  writeln('Este') else
   writeln('Nu este');

end.




3)
var

 n:integer;
 
begin

 read(n);
 
 if (n>=100) and (n<500) then
  writeln('este') else
   writeln('nu este');

end.