Вот порядок приготовления пельменей. В посуду смешивают яйцо,вода, мука. чуть соли. .Тесто замешивают до консистенции,чтоб можно было резать ножом. Дальше Некоторые раскатывают большой сочень потом стаканом или другой формой выдавливают лепешечки на посредственно для пельменей туда кладут фарш слепили и готово. Другие раскатывают тесто под вид колбаски ,затем ножом эту колбаску разрезают на равные части,которые раскатывают для фарша. Я знаю три вида формы пельменей.
Var s,s1:string; i,n,n1,k,p:integer; begin Write('Введите строку: '); Readln(s); n:=Length(s); Write('Введите подстроку: '); Readln(s1); n1:=Length(s1); k:=0; i:=1; while i<=n-n1+1 do begin p:=pos(s1,s,i); if p>0 then begin Inc(k); i:=p+n1 end else i:=n; { для выхода } end; Writeln(s1,' встречается в ',s,' ',k,' раз(а)') end.
Пример Введите строку: Наша Таня громко плачет: уронила в речку мячик Введите подстроку: ро ро встречается в Наша Таня громко плачет: уронила в речку мячик 2 раз(а)
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
