Решить. в заданном натуральном трехзначном числе имеется четная цифра. pascal

Var n,a,b,c: integer; begin readln(n); //найдём 3 цифры a: =n div 100; b: =(n mod 100) div 10; c: =n mod 10; if (a mod 2 = 0) or (b mod 2 = 0) or (c mod 2 = 0) then writeln('есть четная цифра') else writeln('нет четной цифры'); end.

пусть х(мин)-потратела времени на выполнение д/з вчера

имеем уравнение:

х+х-10=60

2х=60+10

2х=70

х=70/2

х=35

35(мин)-потратела времени на выполнение д/з вчера