Ниже в табличной форме представлены сведения о результатах некоторых участников кубка мира по биатлону:
участник страна год рождения очки
м. фуркад франция 1988 1100
э. свендсен норвегия 1985 1035
с. фуркад франция 1984 716
а. шипулин россия 1987 637
а. бёф франция 1986 415
у. э. бьорндален норвегия 1974 548
т. бё норвегия 1988 680
а. маковеев россия 1982 601
е. гараничев россия 1988 585
сколько записей в данном фрагменте удовлетворяет условию
(страна = «норвегия») или (очки < 1000)?
в ответе укажите одно число — искомое количество записей.
дешифровки:
Const sh = '_.,';
Var
St : String;
i : Integer;
Function DeCode(S : String; Tabl : String; k : Integer) : String;
Var j,n : Integer;
Begin
For j:=1 to Length(S) do
Begin
n:=Pos(S[j],sh);
If n>0 then
Begin
n:=n+k;
While n>Length(sh) do n:=n-Length(sh);
While n<=0 do n:=n+Length(sh);
S[j]:=sh[n];
end
end;
DeCode:=S;
end;
Begin
St:='ЗЫФЙГФШРЦ . ШД';
Writeln(Decode(St,sh,-6));
//For i:=-10 to 10 do Writeln(Decode(St,sh,i));
end.
2 - меньше информации
3 - глобус, макет здания, муляж яблока, манекен
4 - рисунок, фотография
5 - знаковой
6 - смешанной
7 - автомобиль — техническое описание автомобиля, город — путеводитель по городу
8 - существенные признаки объекта-оригинала
9 - разные модели объекта
10 - физическая карта, график зависимости расстояния от времени, схема узора для вязания крючком, схема метро
11 - словесное описание, формула
12 - знаковой
13 - смешанной
14 - болт — чертеж болта, мелодия — нотная запись мелодии