2012-2013 аудандық олимпиада есептері ІІ тур (Ауданов Махсет, Маңғыстау облысы)

ІІ-тур 8-9-сынып D есебі
Енгізу файлының аты / Имя входного файла: D.in
Шығару файлының аты / Имя выходного файла: D.out
Есептің жауабы файлының аты / Имя файла решения задачи: D.{c,cpp,pas}
Уақыт шектеу / Ограничение по времени: 2 секунд
Жадыға шектеу / Ограничение по памяти: 64 мегабайт
D есебі Орындықтар
Қатарда N орындықтар тұр. Анда-санда адам келіп, бос орындықтарының біріне отырады. Адам отырғанда оның барлық көршілес орындықтарда отырған адамдар тұрып кетеді. Ең көп дегенде қанша орындық бос емес болуы мүмкін?
Мәліметтерді енгізу форматы
Енгізу файлдың бірінші жолында бүтін сан N (1 <= N <= 1000) беріледі
Мәліметтерді шығару форматы
Есептің жауабын шығарыңыз.

Мысал / Пример
D.in D.out Комментарий
3
2 101, осында 1 бос емес орындық, 0 бос.
101, где 1 это занятый стул, 0 незанятый.

program esepD89;
var n,m:integer;
f1,f2:text;
begin
assign(f1,’d.in’);
reset(f1);
assign(f2,’d.out’);
rewrite(f2);
readln(f1,n);
if n mod 2 =0 then m:=m div 2
else m:=(n div 2)+1;
writeln(f2,m);
close(f1);
close(f2);
end.

ІІ-тур 8-9-сынып E есебі

Енгізу файлының аты / Имя входного файла: E.in
Шығару файлының аты / Имя выходного файла: E.out
Есептің жауабы файлының аты / Имя файла решения задачи: E.{c,cpp,pas}
Уақыт шектеу / Ограничение по времени: 2 секунд
Жадыға шектеу / Ограничение по памяти: 64 мегабайт
E есебі Көп сандар
N саннан тұратын тізбек беріледі. Осы сандарды екіден қос алып көбейткенде ең көп дегенде қанша шығатынын табыңыз.
Мәліметтерді енгізу форматы
Енгізу файлдың бірінші жолында бүтін сан N (1 <= N max then max:=x[i]*x[j];
writeln(f2,max);
close(f1);
close(f2);
end.

ІІ-тур 8-9-сынып F есебі
Енгізу файлының аты / Имя входного файла: F.in
Шығару файлының аты / Имя выходного файла: F.out
Есептің жауабы файлының аты / Имя файла решения задачи: F.{c,cpp,pas}
Уақыт шектеу / Ограничение по времени: 2 секунд
Жадыға шектеу / Ограничение по памяти: 64 мегабайт
F есебі Сөздер
A және B екі жолдар берілген. Осы сөздердің бірінің әріптерін орын ауыстырып, екі сөзді теңестіруге бола ма?
Мәліметтерді енгізу форматы
Енгізу файлдың бірінші жолында ағылшын әліпбиінің кіші әріптерінен тұратын A жолы беріледі (1 <= |A| <= 1000). Екінші жолда дәл осы форматта B жолы беріледі (1 <= |B| <= 1000).
Мәліметтерді шығару форматы
Егер сөздердің бірінің әріптерін орын ауыстырып, екі сөзді теңестіруге болатын болса, “Yes” деген жолы шығарыңыз немесе “No” деп кері жағдайда.

Мысал / Пример
F.in F.out Комментарий
Bca
cba Yes

Ada
dada No

program esepF89;
var c:char;
s,s1,s2,s3:string;
n,n1,n2,i,j,k,h:integer;
ss:array[1..100] of string;
a,b:string;
f:boolean;
f1,f2:text;
begin
assign(f1,’f.in’);
reset(f1);
assign(f2,’f.out’);
rewrite(f2);
readln(f1,a);
readln(f1,b);
s2:=a;
n2:=length(s2);
s1:=b;
n1:=length(s1);
if n1=n2 then
begin
s:=”;
i:=1;
while i<=length(s1) do
begin
j:=1;
f:=false;
while (j<=length(s2)) and not f do
if s2[j]=s1[i] then f:=true else j:=j+1;
if f then
begin
s:=s1[i]+s;
delete(s1,i,1);
delete(s2,j,1);
end
else i:=i+1;
end;
if s2=” then writeln(f2,’YES’)
else writeln(f2,’NO’);
end;
close(f1);
close(f2);
end.

Check Also

Информатитка пәнінен олимпиадаға даярлаудың тиімді жолдары

Жуалы ауданы, №2 Мыңбұлақ орта мектебі информатика пәні мұғалімі Сабиев Бахытжан Төребайұлы.  Олимпиада – бұл …

2 комментария

  1. Махсет саған рахмет!

  2. Махсет саған рахмет!

Добавить комментарий

Ваш e-mail не будет опубликован. Обязательные поля помечены *

Лимит времени истёк. Пожалуйста, перезагрузите CAPTCHA.