49

Вообщем так ребят. В паскале по информатике я нуб. Хоть и плюсы даются хорошо.…

08 февраля 2023

Вообщем так ребят. В паскале по информатике я нуб. Хоть и плюсы даются хорошо. Помогите решить одну задачу, ну или хотя бы примернообъяснить. Билет с 4-значным номером является счастливым, если сумма первых двух цифр равно сумме двух последних. Определить, является ли билет счастливым. Спасибо^-^

категория: информатика

64

Program pr; uses crt; Var a,x1,x2,x3,x4: integer; BeginWriteln ('Введите номер билета'); readln (a); x1: =a div 1000; x2: =(a div 100) mod 10; x3: =(a mod 100) div 10; x4: =a mod 10; if (x1+x2=x3+x4) then Writeln ('Билет счастливый') else Writeln ('Билет не счастливый'); readln; end.

Знаете ответ?

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...