C++
написать программу (1 номер )

nameA, heightA = map(str, input("Введите имя и рост(только число) первого(ой) ученика(цы) через пробел: ").split())

nameB, heightB = map(str, input("Введите имя и рост(только число) второго(ой) ученика(цы) через пробел: ").split())

if heightA > heightB:

   print("Ученик(ца) {0} выше на {1} ед.".format(nameA, int(heightA)-int(heightB)))

elif heightA < heightB:

   print("Ученик(ца) {0} выше на {1} ед.".format(nameB, int(heightB) - int(heightA)))

else:

   print("Рост ученика {0} и {1} равны".format(nameA, nameB))

var

   a, chet, nechet : integer;

begin

   write('введите число: ');

   readln(a);

   while a > 0 do begin

       if (a mod 10) mod 2 = 0then chet += 1 else nechet += 1;

       a := a div 10;

   end;

   writeln('четных: ', chet);

   writeln('не четных: ', nechet);

end.

программа считает 0 как четное число. Если нужно что бы 0 не учитывался при подсчете то необходимо строку:

if (a mod 10) mod 2 = 0then chet += 1 else nechet += 1;

заменить на:

if a mod 10 <> 0 then if (a mod 10) mod 2 = 0then chet += 1 else nechet += 1;