Вопрос по информатике:
Определить, счастливый ли билетик.
С помощью 2 массивов. Принцип такой: на билете 6 цифр. Если сумма первых трех будет равна сумме следующих трех, то билет-счастливый.
- 09.02.2018 11:03
- Информатика
- remove_red_eye 17438
- thumb_up 22
Ответы и объяснения 1
var
s: string;
i, a, b, c, f: integer;
begin
writeln('Номер билета?');
readln(s);
for i := 1 to 3 do
begin
val(s[i], a, f);
b := b + a;
end;
for i := 4 to 6 do
begin
val(s[i], a, f);
c := c + a;
end;
if c = b then writeln('Билет счастливый!') ;
else writeln('Билет НЕ счастливый!');
readln ;
end.
Вроде так
- 01.01.1970 00:00
- thumb_up 43
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.