В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Егор4002
Егор4002
20.02.2021 10:21 •  Информатика

Сумма цифр. даны два числа а и в. подсчитайте кол-во натуральных чисел на отрезке от а до в , сумма цифр которых четна. программа получает на вход два натуральных числа а и в, не превосходящих 10^9^ а< =в . программа должна вывести одно число - кол-во натуральных чисел, больше или равных а и меньших или равных в, сумма цифр которых четна.

Показать ответ
Ответ:
marmeladka0907
marmeladka0907
21.06.2020 11:53
Var n, j, i, a, b, c: integer;
    s: string;
begin
     readln(a, b);
     for i := a to b do
     begin
          s := inttostr(i);
          for j := 1 to length(s) do
              n := n + strtoint(s[j]);
          if (n mod 2 = 0) then
             inc(c);
     end;
     writeln(c);
end.
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота