PascalИспользование массивов, строк, условных операторов не допускаетсяС клавиатуры вводится шестизначное число, определить является ли оно счастливым. Т. е. сумма первых трех цифр равна сумме второй тройки цифр. Если да - вывести `1`, если нет - `0`. (Воспользоваться тем, что `0` делится на любое число).