• Дано натуральное число.найти количество цифр данного числа больших b(b вводится с клавиатуры)

Ответы 1

  • Паскаль:

    uses crt; var a, b, c, code,i, k : integer; st: string; beginwrite ('N = '); readln (a);write ('B =');readln (b); str (a, st); for i:= 1 to length (st) do begin val (st[i],c, code); if c>b then k:= k+1; end; writeln (k); readkey; end.

    • Автор:

      stichajb8
    • 5 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

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

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

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