Задача на паскале
5-9 класс
|
Дана строка s, определить сколько раз в ней встречается слово k.
uses crt;
var s,k:string;
i,n:integer;
begin
read(s);
read(k);
for i:=1 to length(s) do
if k=copy(s,i,length(k)) then n:=n+1;
write(n);
end.
Другие вопросы из категории
противоположных чисел.
2)Контейнер для файлов.
1....2...3...4..5..6...7...=1
1...2...3..4..5..6..7..8..=1
2. Из слогов -бор-,кос,гон,ход ,рог,бег,мол,вар,жар, подберите такой что он был последним слогом для первого слова и первым -для второго(запишите слоги в скабках. 1.по( )ан 2.по ( )гон 3.по( )ожа 4.по( )ок 5.по( )ода 6.по ( )ец 7по ( ) ун 8по ( )а 9 по( )г 10по( )от
помогите пожалуйста:)
Читайте также
программу на Паскале, в которой вычисляются четыре величины: средние температуры зимних месяцев, весенних месяцев, летних и осенних. 2)Вы посетили магазин и купили 10 видов товара. В таблицу T [1..10] записали количество купленного товара каждого вида. В таблицу C [1..10] записали цену единицы каждого вида товара соответственно. Составить программу на Паскале вычисления общей стоимости всех покупок.
ПОЖАЛУЙСТА,ХОТЯ БЫ НА ПАСКАЛЕ СОСТАВЬТЕ!
каждого года XX века?
2)Вы приобрели котёнка.Каждый вечер вы определяете его вес с помощью весов.Как можно описать на Паскале массив,в котором будет храниться значения веса котёнка в течение месяца (например,мая)?
их 4 штуки!
1.дан массив тз N элементов. Есть ли в нем чётные элементы, которые кратны заданному числу K.
2. Дан массив из Nэлементов. Посчитать, сколько элементов массива равных минемальному.
3. Сформировать массив из Nэлементов: 10 12 16 22 30 40.
4. Дан массив из Nэлементов. Перемножить минемальные элементы на 2.
Heeelp!