Program Tema;
var n:integer;
function ultima_cifra_para(n:integer):integer;
begin
var x:integer;
while n>0 do
begin
x=n%10;
if not(odd(x)) then
break;
n:=n/10;
end;
if n=0 then
ultima_cifra_para:=-1;
else
ultima_cifra_para:=x;
end;
Begin
writeln('Introduceti numarul: ');
readln(n);
if ultima_cifra_para(n)=-1 then
writeln('Numarul contine numai cifre impare');
else
writeln('Ultima cifra para este:',ultima_cifra_para(n));
End.
