• РЕшите задачу по информатике.Срочнооо.
    Пользователь вводит простое целое число больше 0.Определить сколько в нем цифр,и сколько четных цифр.Построить блок-схему.

Ответы 5

  • что такое length?
  • Функция. Определяет кол-во символов в строке.
  • спасибо
    • Автор:

      blair35
    • 6 лет назад
    • 0
  • Не за что
    • Автор:

      missyckbb
    • 6 лет назад
    • 0
  • Вот получше версия.varn,i,chet:integer;s:string;beginreadln(n);str(n,s); // Функция str преобразует число n в строку sfor i:=1 to length(s) do beginif (ord(s[i])-48) <= 0 then halt; // Процедура halt завершает программу если введенное число <=0if (ord(s[i])-48) mod 2 = 0 then chet:=chet+1;end;writeln('Кол-во цифр - ',length(s),' Кол-во четных - ',chet);end.
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years