Поиск

Полнотекстовый поиск:
Где искать:
везде
только в названии
только в тексте
Выводить:
описание
слова в тексте
только заголовок

Рекомендуем ознакомиться

'Документ'
В преамбуле устава Всемирной организации здравоохранения записано: «Здоровье - это состояние полного физического, психического и социального благополу...полностью>>
'Документ'
Утверждение плана работы школы по подготовке и проведению государственной аттестации. Назначение учителей, ответственных за подготовку учащихся к ГИА....полностью>>
'Документ'
На этом занятии я продолжу объяснять особенности строения природных полимерных молекул. И речь пойдет о строении и функциях нуклеиновых кислот и АТФ. ...полностью>>
'Документ'
Регион Дата предыдущих выборов Явка на предыдущих выборах Явка 08.09. 013 Чеченская Республика 1 .10. 008 95,1% 9 ,0% Забайкальский край 1 ....полностью>>

Главная > Тесты

Сохрани ссылку в одной из сетей:
Информация о документе
Дата добавления:
Размер:
Доступные форматы для скачивания:

Задачи II (муниципальный) тура олимпиады школьников по информатике: условия, тесты, решения

2000-2001 уч. год

Задание 1. «Шифр Цезаря»

Создать программу шифровки и дешифровки текста по методу Цезаря. Ключом шифра является задаваемая цифра i: k-ая буква алфавита заменяется на (k+i)-ю букву, другие знаки текста (цифры, пробелы, знаки препинания) не шифруются. при этом буквы, номера которых превышают число букв алфавита, определяются циклическим переходом на начало алфавита.

Технические требования:

Файл Input1.txt содержит в первой строке ключ шифра, во второй – шифруемый текст, в третьей – текст, который нужно расшифровать.

В первой строке выходного файла Output1.txt должен содержаться зашифрованный текст, во второй – дешифрованный текст.

Пример входных и выходных данных:

Input1.txt

3

опция

нсх

Output1.txt

стщлв

кот

Задание 2. «Размещение квадратов»

Некоторое кол-во клеток на доске размером M*N занято фишками. Создать программу поиска одного из квадратов максимальной площади, целиком состоящего из незаня­тых клеток, и получить размер и координаты вершин квадрата.

Технические требования:

Входной файл Input2.txt содержит в первой строке число строк и число столбцов клетчатой доски, в последующих строка файла содержатся значения элементов таблицы по строкам: 1 – клетка занята фишкой, 0 – клетка свободна.

В выходном файле Output2.txt должны содержаться длина стороны квадрата и четыре пары индексов – координат клеток, образующих вершины квадрата.

Пример входных и выходных данных:

Input2.txt

4 5

1 1 0 0 0 1,3

1 0 0 0 0 1,4

1 1 0 1 0 2,3

1 1 1 1 0

Output2.txt

2

1,3

1,4

2,3

2,4

Задание 3. «Интервалы»

Даны действительные числа A[1]...A[n], n - четное. Эти числа определяют n/2 ин­тервалов числовой оси: ((A[1],A[2]),...,(A[n-1],A[n])). Составьте программу для выяснения:

  1. имеют ли все данные интервалы общий подинтервал? Если да, то указать концы интервала;

  2. является ли интервалом объединение данных интервалов? Если да, то ука­зать концы интервала.

Технические требования:

Входной Input3.txt содержит в первой строке число n, во второй строке – последовательность действительных чисел.

В выходном файле Output3.txt должны содержаться:

  1. В первой строке - пара чисел или слово "нет";

  2. Во второй строке - пара чисел или слово "нет".

Пример входных и выходных данных:

Input3.txt

6

17.5.24.5510

Output3.txt

Нет

110

Задание 4. «137»

В множестве, состоящем из натуральных чисел, в десятичной записи которых встре­чаются только цифры 1,3,7, все элементы занумерованы в порядке возрастания. По за­данному n определить n-й элемент множества. Технические требования:

Входной файл Input4.txt содержит в первой строке число n

Выходной файл Output4.txt должно содержаться n-ое число множества.

Пример входных и выходных данных:

Input4.txt

4

Output4.txt

11

Тесты к заданиям

Задание 1.

На входе

На выходе

1.

4

Ответ

(3 балла)

энергия

бсйфзмг

жйэйчцжт

вещество

2.

6

(7 баллов)

Олимпиада-2000

Фсотхожкж-2000

Нужуол-чосж

Знание-сила

3.

3

(10 баллов)

В мире Windows

Е плуи Zlqgrzv

вкюн Edvlf

Язык Basic

Задание 2.

На входе

На выходе

1.

  1. 4

1011

0010

1110

1

1,2

(5 баллов)

2.

  1. 5

00111

10011

10000

01010

2

2,2

2,3

3,2

3,3

( 10 баллов)

3.

  1. 7

1100010

0101000

1000001

0100000

1110000

3

3,4

3,6

5,4

5,6

(15 баллов)

Задание 3.

На входе

На выходе

1.

8

1.5 3.5 3 6 6.5 9.5 7 8

Нет

нет

(8 баллов)

2.

8

1.5 3 5 3 6 5 9 7 8

Нет

1.5 9

(8 баллов)

3.

8

1.5 4.5 3 6 4 7 3.5 8

4 4.5

1.5 8

(9 баллов)

Задание 4.

На входе

На выходе

1.

10

71

(7 баллов)

2.

100

7171

(8 баллов)

3.

1000

737371

(10 баллов)

Решения

Задание 1. «Шифр Цезаря»

Program zadan_1;

var f,g:text;

c:char;

i,k,code:integer;

Function lat_b(c:char;i:integer):char;

var k:integer;

Begin

k:=(ord(c)-ord('A')+i) mod 26;

if k>=0 then k:=k+ord('A') else k:=ord('Z')+k+1;

lat_b:=chr(k);

End;

Function lat_m(c:char;i:integer):char;

var k:integer;

Begin

k:=(ord(c)-ord('a')+i) mod 26;

if k>=0 then k:=k+ord('a') else k:=ord('z')+k+1;

lat_m:=chr(k);

End;

Function rus_b(c:char;i:integer):char;

var k:integer;

Begin

k:=(ord(c)-ord('А')+i) mod 32;

if k>=0 then k:=k+ord('А') else k:=ord('Я')+k+1;

rus_b:=chr(k);

End;

Function rus_m(c:char;i:integer):char;

var k:integer;

Begin

if c in ['а '..'п'] then

begin

k:=(ord(c)-ord('а')+i) mod 32;

if k<0 then k:=ord('я')+k+1 else

if k+ord('а')>ord('п')

then k:=k+ord('а')-ord('п')+ord('р')-1

else k:=k+ord('а');

end;

if c in ['р'..'я'] then

begin

k:=(ord(c)-ord('р')+i) mod 32;

if k<0 then k:=ord('п')+k+1 else

if k+ord('р')>ord('я')

then k:=k+ord('р')-ord('я')+ord('а')-1

else k:=k+ord('р');

end;

rus_m:=chr(k);

End;

Begin

assign(f,'input1.txt');

assign(g,'output1.txt');

reset(f);

rewrite(g);

i:=0;

while not eoln(f) do

begin

read(f,c);

if c in ['0'..'9'] then

begin

val(c,k,code);

if i=0 then i:=k else i:=i*10+k;

end;

end;

readln(f);

while not eoln(f) do

begin

read(f,c);

if c in ['A'..'Z'] then write(g,lat_b(c,i)) else

if c in ['a'..'z'] then write(g,lat_m(c,i)) else

if c in ['А'..'Я'] then write(g,rus_b(c,i)) else

if (c in ['а'..'п']) or (c in ['р'..'я'])

then write(g,rus_m(c,i))

else write(g,c);

end;

readln(f);

writeln(g);

while not eoln(f) do

begin

read(f,c);

if c in ['A'..'Z'] then write(g,lat_b(c,-i)) else

if c in ['a'..'z'] then write(g,lat_m(c,-i)) else

if c in ['А'..'Я'] then write(g,rus_b(c,-i)) else

if (c in ['а'..'п']) or (c in ['р'..'я'])

then write(g,rus_m(c,-i))

else write(g,c);

end;

close(f);

close(g);

End.

Задание 2. «Размещение квадратов»

Program zadan_2;

type mas=array[1..30,1..30] of integer;

procedure poisk(i,j,m,n:integer;a:mas; var k,m1,n1:integer);

var l,t,f,r:integer;

begin

f:=0;

r:=1;

while f=0 do

begin

if (r+i<=m) and (r+j<=n) then

begin

for l:=i to r+i do

for t:=j to r+j do if a[l,t]=1 then f:=1;

if (f=0) and (r>k) then

begin

k:=r;

m1:=i;

n1:=j;

end;

r:=r+1;

end

else f:=1;

end;

end;

var m,n,i,j,k,m1,n1:integer;

a:mas;

input,output:text;

begin

clrscr;

assign(input,'input.txt');

reset(input);

readln(input,m,n);

for i:=1 to m do

begin

for j:=1 to n do read(input,a[i,j]);

readln(input);

end;

close(input);

k:=0;

m1:=0;

n1:=0;

for i:=1 to m do for j:=1 to n do

if a[i,j]=0 then poisk(i,j,m,n,a,k,m1,n1);

k:=k+1;

assign(output,'output.txt');

rewrite(output);

writeln(output,k);

writeln(output,m1,',',n1);

writeln(output,m1,',',n1+k-1);

writeln(output,m1+k-1,',',n1);

writeln(output,m1+k-1,',',n1+k-1);

close(output);

end.

Задание 3. «Интервалы»

Program zadan_3;

Type tInt=record

b,e:real;

end;

tDat=array[1..254]of tInt;

procedure ReadFile(var n:byte;var Dat:tDat);

var f:text;

i:byte;

ch:real;

begin

assign(f,'input3.txt');

reset(f);

Readln(f,n);

n:=n div 2;

for i:=1 to n do

begin

Read(f,ch);

Dat[i].b:=ch;

Read(f,ch);

Dat[i].e:=ch;

end;

close(f)

end;

procedure SaveFile(Z1:boolean;i1:tInt;z2:boolean;i2:tInt);

var f:text;

begin

assign(f,'output3.txt');

ReWrite(f);

if z1 then writeln(f,I1.b:10:4,' ',I1.e:10:4) else writeln(f,'Нет');

if z2 then writeln(f,I2.b:10:4,' ',I2.e:10:4) else writeln(f,'Нет');

close(f);

end;

function Max(x,y:real):real;

begin

if x>y then Max:=x else Max:=y;

end;

function Min(x,y:real):real;

begin

if xthen Min:=x else Min:=y;

end;

procedure zadacha1(n:byte;Dat:tDat;var z1:boolean;var Int:tInt);

var i:byte;

begin

Int:=Dat[1];

for i:=2 to n do

begin

Int.b:=Max(Int.b,Dat[i].b);

Int.e:=Min(Int.e,Dat[i].e);

end;

if Int.b>Int.e then z1:=False else z1:=true;

end;

procedure Zadacha2(n:byte;Dat:tDat;var z2:boolean;var Int:tInt);

var flag:boolean;

s:set of 1..254;

i:byte;

begin

z2:=false;

Int:=Dat[1];

s:=[1];

repeat

flag:=true;

for i:=2 to n do

begin

if i in s then continue;

if (Int.b<=Dat[i].e)and(Int.e>=Dat[i].b)then



Похожие документы:

  1. Программа элективного курса «задачи с параметрами» IV раздел «результаты педагогической деятельности»

    Программа
    ... математических способностей школьников в условиях летних ... олимпиад (г.Нерюнгри): В 2000 -01 уч.году – 2 ученика по математике 2, 3 места в городской олимпиаде, в 2003-04 уч.году – 2 ученика по ... информатики: - «Решение задач части С ЕГЭ по математике ...
  2. Мониторинг 02. 09. 2013

    Документ
    ... муниципального тура основного конкурса «Учитель года Кубани». Победителем муниципального этапа краевого конкурса в номинации «Учитель года ... московских школьников завоевали золотые медали на международных олимпиадах школьников по информатике, физике ...
  3. Публичный доклад мобу сош №3 с. Бураево на 2010-2011 уч год

    Документ
    ... -ние» 2001 год. Информатика в играх. Автор: Горячев А.В. Горячев А.В. Информатика в играх. М.: «Просвещение» 2001 год. Характеристика программно ... решения задач центра в школе были запланированы и в течение года проведены различные мероприятия. По ...
  4. Информационная справка о школе

    Документ
    ... муниципального этапа Всероссийской олимпиады школьников по информатике. Крайняя Л.А. является членом предметной комиссии пробного ЕГЭ в муниципальном районе по ... уч. год. №1 Август 2013 г. Публичный отчет директора ОУ за 2011 -2012 учебный год и задачи ...
  5. Мониторинг 16. 09. 2013

    Документ
    ... тура олимпиады по базовому курсу информатики Дипломант Всероссийского Пермского чемпионата по физике Лауреат муниципального конкурса "Ученик года ... жюри Всероссийской олимпиады школьников по математике Лев Емельянов. "Лучший, по решению жюри, участник ...

Другие похожие документы..