мне нужно написать программу на языке pascalabcnet чтобы спрашивалась переменная x
q должно быть равно 1/100000 от x
w 1/10000 x
e 1/1000 x
r 1/100 x
t 1/10 x
y остаток от x/10
и чтобы программа проверяла если q+w+e = r+t+y
то программа пишет да
иначе программа напишет нет
короче это программа узнаёт счастливый билет или нет
билет является счастливым если сумма первых трёх цифр равняется сумме 4 5 6 цифр