Есть ответ 👍

Вводятся подстрока и строка. определить, сколько раз данная подстрока входит в строку?

115
125
Посмотреть ответы 2

Ответы на вопрос:

lerochek6
4,6(47 оценок)

Var count, p: integer;     s, ps: string; begin       readln(s, ps);       p: =pos(ps,s);       while p> 0 do       begin           count : = count + 1;           delete(s, p, length(ps));           p: =pos(ps, s);       end;       writeln(count); end.вот так =)
53490
4,8(58 оценок)

n = 256

2^i = n

2^i = 256

i = 8 бит

ответ: 8 бит.

Популярно: Информатика