PASCAL ABC.
Составить программу , определяющую , является ли шестизначный номер билета счастливым (у которого сумма первых трех цифр равна сумме последних трех цифр)
P.S. Нужно использовать div и mod..
Составить программу , определяющую , является ли шестизначный номер билета счастливым (у которого сумма первых трех цифр равна сумме последних трех цифр)
P.S. Нужно использовать div и mod..
More Questions From This User See All
Answers & Comments
Verified answer
Vara: integer;begin
readln(a);
if(a div 100000 + ((a div 1000) mod 10) + (((a div 1000) div 10) mod 10) ) =(((a mod 1000) div 100) + ((a mod 1000) mod 10) + (((a mod 1000) div 10) mod 10)) thenwriteln('Да')
else writeln('Нет');
end.