Вопрос по информатике:
С клавиатуры вводится целое шестизначное число. Необходимо определить, является ли оно "счастливым". ("Счастливыми" называются те числа, у которых сумма перых трёх цифр равна сумме вторых трёх цифр).
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 13.03.2018 19:42
- Информатика
- remove_red_eye 19733
- thumb_up 97
Ответы и объяснения 1
var
x:string;
a1,a2,a3,b1,b2,b3,cd:integer;
begin
readln(x);
if length(x) = 6 then
begin
val(copy(x,1,1),a1,cd);
val(copy(x,2,1),a2,cd);
val(copy(x,3,1),a3,cd);
val(copy(x,4,1),b1,cd);
val(copy(x,5,1),b2,cd);
val(copy(x,6,1),b3,cd);
if a1+a2+a3 = b1+b2+b3 then
writeln('Lucky')
else
writeln('not Lucky');
end;
read;
end.
- 14.03.2018 15:59
- thumb_up 1
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.