Написать программу: дано натуральное число. верно ли, что данное число начинается на нечетную цифру

Visiting456 Visiting456    3   28.07.2019 08:30    1

Ответы
Индира1973 Индира1973  03.10.2020 15:22
Var
    i, d: integer;

begin
    readln(d);
    while d > 0 do
    begin
        i := d mod 10;
        d := d div 10;
    end;
    write(i mod 2 = 1);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика