Презентация по информатике Строковый тип данных в языке Паскаль (10 класс)

Строковый тип данных Урок_2 Программа должна считать, сколько раз в строке S встречается подстрока '12'. Какой оператор надо вставить вместо многоточия? Вводите ответ без пробелов. c := 0; repeat ...  if p <> 0 then begin  c := c + 1; Delete ( S, 1, p+1) end; until p = 0; p := POS (‘12’, S); Какой оператор надо вставить вместо многоточия, чтобы в строке S были записаны символы строки Q в обратном порядке? Вводите ответ без пробелов. Q := '123456789';S := '1';for k:=2 to 9 do begin ...end; S := Q[k] + S; PROGRAM Dlina_1;VAR S : STRING; n:INTEGER;BEGIN Writeln(введите слово ') ; Readln(S); n:= Length (S) ; Writeln(‘введите слово ', n:5 ,' букв..');END. Записываем длину строки в переменную целого типа PROGRAM Dlina_2;VAR S : STRING;BEGIN Writeln(’введите слово’) ; Readln(S); Writeln(’слово состоит из ’, Length (S) ,’букв. ’); END. Выводим на экран длину строки, как результат выполнения функции Задача 1. Составить программу подсчитывающую количество букв в слове. Uses crt;var a,b:string; m,n:Integer;Begin Clrscr; Writeln('ВВеди первую строку ');Readln(a); Writeln('ВВеди вторую строку ');Readln(b); m:=Length(a); n:=Length(b); if (m=n) then writeln('Строки равны'); if (m>n) then writeln('Первая больше'); if (m‘R') then b:=b+a[i]; a:=b; writeln(a);end. Перебираем от 1 до последней буквы Подготавливаем дополнительную переменную Если на i-ом месте не стоит R то прибавляем эту букву к тому, что есть в B То, что получилось в В перемещаем обратно в А Удаление символов из строки Вложенные циклы begin ClrScr; Write('ВВеди строку '); readln(s); s1:=',.;:"!?-'; for i:=1 to length(s1) do begin k:=0; for j:=1 to length(s) do if (s[j]=s1[i]) then k:=k+1; if (k<>0) then writeln(s1[i],' - ',k:5,' раз'); end;end. Задача 11. Дана строка символов, содержащая знаки препинания. Подсчитать какие и сколько знаков препинания содержит строка. Внешний цикл, осуществляющий перебор знаков записанных в S1 Тело внешнего цикла содержит цикл, отвечающий за перебор символов введенной строки