Программирование. Строки.
На этом занятии мы разберем основные процедуры и функции обработки строковых величин, проанализируем готовые алгоритмы и рассмотрим задачи группы «С»
Задания по теме для самостоятельного решения
Задание 1
(2 балла)Проанализируйте данную программу. Определите, какое значение будет принимать переменная n после выполнения этой программы.
var
s:string;
i,n:integer;
begin
s:='sdfrgfcdvbhs';
n:=0;
for i:=1 to length(s) do
if s[i]='d' then inc(n);
writeln(n);
end.
Задание 2
(2 балла)Проанализируйте данную программу. Определите, какое значение будет выведено на экран после выполнения этой программы.
var
s:string;
k,i,n,code:integer;
begin
s:='erg1223gt5gg34i0y';
k:=0;
for i:=1 to length(s) do
if (s[i]='5') or (s[i]='2')
then begin
val(s[i],n,code);
k:=k+n;
end;
writeln(2*k);
end.
Задание 3
(2 балла)Дан фрагмент программы, написанный на языке Паскаль. Что будет выведено на экран в результате выполнения программы?
S1:='sdf4fgg56ghty61';
S2:= ' ';
For i:=1 to length(S1) do
If (S1[i]>='0') and (S1[i]<='9')
Then S2:=S1[i]+S2;
Writeln(S2);