Для начала определим что такое разряд числа. Разряд это порядковый номер цифры, и счет начинается с запятой, отделяющей дробь, счет начинается с 0 разряда до последней цифры. Например, число 1234,0: 0 разряд - 4, 1 разряд - 3, 2 разряд - 2 и 3 разряд единица.
Теперь определимся как переводить из 16й в 10ю. Для перевода шестнадцатеричного числа в десятичное необходимо это число представить в виде суммы произведений степеней основания шестнадцатеричной системы счисления на соответствующие цифры в разрядах шестнадцатеричного числа.
Т.е.:
Чтобы перевести буквы в числа надо воспользоваться списком:
A=10; B=11; C=12; D=13; E=14; F=15
Теперь расмотрим данные нам числа:
, перевод удобно сделать через промежуточную двоичную систему.
var
age : integer;
begin
read (age);
if (age > 50) or (age < 17) then writeln ('No') else writeln ('Yes');
end.
var
a, b, c, count : integer;
begin
read (a, b, c);
count := 3 - a mod 2 - b mod 2 - c mod 2;
writeln (count);
end.
var
k : integer;
begin
read (k);
if (k mod 1000 div 100 = k mod 100 div 10) and (k div 1000 = k mod 10) then writeln ('Yes') else writeln ('No');
end.