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

petrakovatatya petrakovatatya    3   02.04.2019 08:10    12

Ответы
markay markay  28.05.2020 10:39

Паскаль:

uses crt;
var
a, b, c, code,i, k : integer;
st: string;
begin
write ('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.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика