никак не могу справиться с подобными задачами, заранее А. М. Кабанов, Тольятти) Сервер автоматически сохраняет изображения с камер в специальный каталог, при этом переименовывая их в cam1_x. webp (x - порядковый номер от 0000 до 9999) или cam2_xxx. webp (xxx - порядковый номер от 000 до 999). Поиск в каталоге по маске cam1_*.webp выдал 5320 файлов, поиск по маске cam2_*.webp выдал 434 файла. Определите, сколько файлов будет найдено по маске cam?_?3*.webp.

галя,толя,миша,лена,вася

caps lock,shift

var c: char; s: string; i,k,p: integer; begin readln(c); {чтение заданного символа} readln(s); {чтение заданного слова} p: = pos(c,s); {определяем позицию символа} if (p=0) then {функция вернёт 0, если символ не будет найден} writeln('такого символа в слове нет.') else {если символ есть, то } begin writeln('указанный символ расположен на позиции: ',p); k: = 0; {k хранит количество вхождений} p: = length(s); {p хранит длину строки(слова)} for i: =1 to p do {пробегаем по всем символам слова} if (s[i]=c) then inc(k); {если символ совпадает, увеличиваем на 1 переменную k} writeln('количество вхождений данного символа: ',k); end; end.

письменность была нужна для оформления сделок, фиксации движения товаров, выручки, учета,  финикийцы известны, прежде всего, как предприимчивые торговцы и отважные мореплаватели.