3.3 Счастливый билет
|
Имя входного файла
|
input.txt
|
|
Имя выходного файла
|
output.txt
|
|
Максимальное время работы на одном тесте
|
2 секунды
|
|
Ограничение по памяти
|
64 Мб
|
У вас есть билет с шестизначным номером, определите,
счастливый ли он.
Билет считается счастливым, если сумма первых трех цифр
равна сумме трех последних, например 154325, сумма равна: 1+5+4=3+2+5.
Формат входных данных
Во входном файле записано одно целое шестизначное число A
(100 000 ≤ А ≤ 999 999).
Формат выходных данных
В выходной файл выведите ответ Yes или No.
Пример
|
input.txt
|
output.txt
|
|
154325
|
Yes
|
|
342764
|
No
|
Пояснения к задаче:
Прочитай о div и mod , изучи пример решения задачи
ПРИМЕР ПРОГРАММЫ
Дано
трёхзначное число. Чему равны его цифры?
var a,c1,c2,c3:integer;
Begin
writeln(''введите
трёхзначное число '); readln(a);
c1:=a div 100;
c2:=(a mod 100) div 10; {или c2:=(a div 10) mod 10;}
c3:=a mod 10;
writeln('первая
цифра -',c1);
writeln('вторая
цифра -',c2);
writeln('третья
цифра -',c3);
end. (скопируй на свой компьютер программу, попробуй найти сумму цифр трехзначного числа).
Эти примеры тебе (еще раз) помогут понять значения операций целочисленного деления:
25 div 10 = 2 25 mod 10 = 5 357 div 10 = 35, 35 mod 10 = 5 или ((357 div 10 ) mod 10 = 5)
ПрИмЕр КаК нЕ нАдО рЕшАтЬ зАдАчУ program bilet;
var x1,x2,x3,y1,y2,y3,s1,s2:integer;
begin
writeln('введите первые 3 цифры на билете, по одному');
Readln(x1,x2,x3);
Writeln('введите последние 3 цифры на билете, по одному');
readln(y1,y2,y3);
s1:=x1+x2+x3;
s2:=y1+y2+y3;
Write('номер билета: ',x1,x2,x3,y1,y2,y3);
writeln;
If s1=s2 then writeln('yes') else writeln('no');
end. В чем ошибка? по условию: Формат входных данных - Во входном файле записано одно целое шестизначное число A, а не шесть, как в решении. решение предполагает использование операций целочисленного деления!!!
| 
