مساعدة من فضلكم لحل التمارين في الخوارزميات

[__الهاوي__]

برنامج معرفة حالة العدد، زوجي أو فردي
بالسي شارب

كود PHP:

{
            int nbr;
            Console.Write("ecrit la valeur a testé : ");
            nbr = Convert.ToInt32(Console.ReadLine());

            Console.WriteLine("le reste de la division est {0}", nbr % 2);

            if (nbr % 2 == 0)
                Console.WriteLine("le nombre {0} est paire", nbr);
            else
                Console.WriteLine("le nombre {0} est impaire", nbr);
            Console.ReadLine();
        } 


بالباسكال

كود PHP:

program oddeven;
uses
    wincrt;{si vous utilisez turbo 7 alors remplacez la par "uses CRT"}

var
     i, nbr: integer;
begin

         write('ecrit la valeur a testé : ');
         read(nbr);

         writeln('le reste de la division est ',nbr mod 2);

         if nbr mod 2 = 0 then
            writeln('le nombre ',nbr, ' est paire')
         else
            writeln('le nombre ',nbr, ' est impaire');
end.