1. Вариант. Дан це­ло­чис­лен­ный мас­сив из 20 эле­мен­тов. Эле­мен­ты мас­си­ва могут при­ни­мать целые зна­че­ния от –10 000 до 10 000 вклю­чи­тель­но. Опи­ши­те на одном из язы­ков про­грам­ми­ро­ва­ния ал­го­ритм, поз­во­ля­ю­щий найти и вы­ве­сти ко­ли­че­ство пар эле­мен­тов мас­си­ва, в ко­то­рых сумма эле­мен­тов де­лит­ся на 3, но не де­лит­ся на 9. В дан­ной за­да­че под парой под­ра­зу­ме­ва­ют­ся два со­сед­них эле­мен­та мас­си­ва.

3. Вариант. Дан це­ло­чис­лен­ный мас­сив из 40 эле­мен­тов. Эле­мен­ты мас­си­ва могут при­ни­мать целые зна­че­ния от –100 до 100 вклю­чи­тель­но. Опи­ши­те на есте­ствен­ном языке или на одном из язы­ков про­грам­ми­ро­ва­ния ал­го­ритм, поз­во­ля­ю­щий найти и вы­ве­сти ко­ли­че­ство пар эле­мен­тов мас­си­ва, сумма ко­то­рых нечётна, а про­из­ве­де­ние мень­ше 100. Под парой под­ра­зу­ме­ва­ет­ся два под­ряд иду­щих эле­мен­та мас­си­ва.

5. Вариант. Дан мас­сив, со­дер­жа­щий не­от­ри­ца­тель­ные целые числа. Если сумма всех эле­мен­тов мас­си­ва чётная, нужно вы­ве­сти ко­ли­че­ство нечётных (по зна­че­нию) эле­мен­тов мас­си­ва, если нечётная – ко­ли­че­ство чётных. На­при­мер, для мас­си­ва из 6 эле­мен­тов, рав­ных со­от­вет­ствен­но 2, 6, 12, 17, 3, 8, от­ве­том будет 2 – ко­ли­че­ство нечётных эле­мен­тов, так как общая сумма всех эле­мен­тов чётна.

7. Вариант. Дан це­ло­чис­лен­ный мас­сив из 30 эле­мен­тов. Эле­мен­ты мас­си­ва могут при­ни­мать целые зна­че­ния от 0 до 10 000 вклю­чи­тель­но. Опи­ши­те на есте­ствен­ном языке или на одном из язы­ков про­грам­ми­ро­ва­ния ал­го­ритм, поз­во­ля­ю­щий найти и вы­ве­сти ми­ни­маль­ное зна­че­ние среди трёхзнач­ных эле­мен­тов мас­си­ва, де­ля­щих­ся на 7. Если в ис­ход­ном мас­си­ве нет эле­мен­та, зна­че­ние ко­то­ро­го яв­ля­ет­ся трёхзнач­ным чис­лом и при этом крат­но семи, то вы­ве­ди­те со­об­ще­ние «Не най­де­но».

9. Вариант. Дан мас­сив, со­дер­жа­щий 2015 не­от­ри­ца­тель­ных целых чисел. Ямой на­зы­ва­ет­ся не край­ний эле­мент мас­си­ва, ко­то­рый мень­ше обоих своих со­се­дей. Не­об­хо­ди­мо найти в мас­си­ве самую глу­бо­кую яму, то есть яму, зна­че­ние ко­то­рой ми­ни­маль­но. Если в мас­си­ве нет ни одной ямы, ответ счи­та­ет­ся рав­ным 0. На­при­мер, в мас­си­ве из шести эле­мен­тов, рав­ных со­от­вет­ствен­но 4, 9, 2, 17, 3, 8, есть две ямы – 2 и 3, самая глу­бо­кая яма – 2.

10. Вариант. Опи­ши­те ал­го­ритм вы­чис­ле­ния раз­но­сти между сред­ним ариф­ме­ти­че­ским мак­си­маль­но­го и ми­ни­маль­но­го зна­че­ний эле­мен­тов за­дан­но­го це­ло­чис­лен­но­го мас­си­ва из 30 эле­мен­тов и сред­ним ариф­ме­ти­че­ским всех эле­мен­тов этого мас­си­ва.

11. Вариант. Опи­ши­те ал­го­ритм под­сче­та суммы всех от­ри­ца­тель­ных эле­мен­тов за­дан­но­го це­ло­чис­лен­но­го мас­си­ва раз­ме­ром 30 эле­мен­тов. Если от­ри­ца­тель­ных эле­мен­тов нет, со­об­щи­те об этом., i:integer;

13. Вариант. Дан це­ло­чис­лен­ный мас­сив из 30 эле­мен­тов. Эле­мен­ты мас­си­ва могут при­ни­мать зна­че­ния от 0 до 1000. Опи­ши­те на рус­ском языке или на одном из язы­ков  про­грам­ми­ро­ва­ния ал­го­ритм, ко­то­рый поз­во­ля­ет под­счи­тать и вы­ве­сти сред­нее ариф­ме­ти­че­ское эле­мен­тов мас­си­ва, име­ю­щих не­чет­ное зна­че­ние. Га­ран­ти­ру­ет­ся, что в ис­ход­ном мас­си­ве хотя бы один эле­мент имеет не­чет­ное зна­че­ние. 

За­пи­сы­ва­ем в пе­ре­мен­ные X и Y на­чаль­ное зна­че­ние, рав­ное нулю. В цикле от пер­во­го эле­мен­та до трид­ца­то­го на­хо­дим оста­ток от де­ле­ния эле­мен­та ис­ход­но­го мас­си­ва на два. Если этот оста­ток равен еди­ни­це, то уве­ли­чи­ва­ем счет­чик суммы X на зна­че­ние те­ку­ще­го эле­мен­та мас­си­ва, а счет­чик ко­ли­че­ства Y на 1. Пе­ре­хо­дим к сле­ду­ю­ще­му эле­мен­ту. После цикла про­из­во­дим де­ле­ние счет­чи­ка суммы X на счет­чик ко­ли­че­ства Y и за­пи­сы­ва­ем ре­зуль­тат в пе­ре­мен­ную S.

14. Вариант. Дан це­ло­чис­лен­ный мас­сив из 30 эле­мен­тов. Эле­мен­ты мас­си­ва могут при­ни­мать зна­че­ния от -1000 до 1000. Опи­ши­те на рус­ском или на одном из язы­ков про­грам­ми­ро­ва­ния ал­го­ритм, ко­то­рый поз­во­ля­ет под­счи­тать и вы­ве­сти сред­нее ариф­ме­ти­че­ское тех эле­мен­тов мас­си­ва, ко­то­рые по сво­е­му зна­че­нию мень­ше по­след­не­го эле­мен­та этого мас­си­ва. Га­ран­ти­ру­ет­ся, что в ис­ход­ном мас­си­ве есть хотя бы один такой эле­мент.

15. Вариант. Дан це­ло­чис­лен­ный мас­сив из 40 эле­мен­тов. Эле­мен­ты мас­си­ва могут при­ни­мать про­из­воль­ные зна­че­ния. Опи­ши­те на рус­ском языке или на одном из язы­ков про­грам­ми­ро­ва­ния ал­го­ритм, ко­то­рый на­хо­дит и вы­во­дит сумму эле­мен­тов наи­боль­шей воз­рас­та­ю­щей по­сле­до­ва­тель­но­сти под­ряд иду­щих эле­мен­тов мас­си­ва.

16. Вариант. Опи­ши­те на рус­ском языке или одном из язы­ков про­грам­ми­ро­ва­ния ал­го­ритм под­сче­та сред­не­го зна­че­ния от­ри­ца­тель­ных эле­мен­тов в це­ло­чис­лен­ном мас­си­ве из 30 эле­мен­тов в пред­по­ло­же­нии, что в нем есть хотя бы один от­ри­ца­тель­ный эле­мент.

17. Вариант. Дан це­ло­чис­лен­ный мас­сив из 20 эле­мен­тов. Эле­мен­ты мас­си­ва могут при­ни­мать зна­че­ния от 0 до 500. Опи­ши­те на языке про­грам­ми­ро­ва­ния ал­го­ритм, ко­то­рый поз­во­ля­ет под­счи­тать и вы­ве­сти сред­нее ариф­ме­ти­че­ское эле­мен­тов мас­си­ва, име­ю­щих ­чет­ное зна­че­ние. Га­ран­ти­ру­ет­ся, что в ис­ход­ном мас­си­ве хотя бы один эле­мент имеет чет­ное зна­че­ние.  

18. Вариант. Дан це­ло­чис­лен­ный мас­сив из 30 эле­мен­тов. Эле­мен­ты мас­си­ва могут при­ни­мать целые зна­че­ния от 0 до 1000. Эле­мент мас­си­ва на­зы­ва­ет­ся хо­ро­шим, если это дву­знач­ное число, причём цифра в раз­ря­де де­сят­ков боль­ше, чем цифра в раз­ря­де еди­ниц. Опи­ши­те на одном из язы­ков про­грам­ми­ро­ва­ния ал­го­ритм, поз­во­ля­ю­щий найти и вы­ве­сти сумму всех хо­ро­ших эле­мен­тов мас­си­ва. При­мер про­грам­мы на языке Пас­каль

19. Вариант. Дан це­ло­чис­лен­ный мас­сив из 30 эле­мен­тов. Эле­мен­ты мас­си­ва могут при­ни­мать зна­че­ния от −20 до 20 — све­де­ния о тем­пе­ра­ту­ре за каж­дый день но­яб­ря. Опи­ши­те на рус­ском языке или на одном из язы­ков про­грам­ми­ро­ва­ния ал­го­ритм, ко­то­рый поз­во­ля­ет под­счи­тать и вы­ве­сти сред­нюю тем­пе­ра­ту­ру среди дней, когда были за­мо­роз­ки (тем­пе­ра­ту­ра опус­ка­лась ниже 0 °С). Га­ран­ти­ру­ет­ся, что хотя бы в один день но­яб­ря была от­ри­ца­тель­ная тем­пе­ра­ту­ра.

20. Вариант. Дан це­ло­чис­лен­ный мас­сив из 30 эле­мен­тов. Эле­мен­ты мас­си­ва могут при­ни­мать зна­че­ния от 1 до 5 и со­дер­жат го­до­вые оцен­ки по ин­фор­ма­ти­ке уча­щих­ся вы­пуск­но­го клас­са. Опи­ши­те на рус­ском языке или на одном из язы­ков про­грам­ми­ро­ва­ния ал­го­ритм, ко­то­рый поз­во­ля­ет под­счи­тать и вы­ве­сти сред­ний балл среди «хо­ро­ши­стов» и «от­лич­ни­ков» (тех, кто по­лу­чил ито­го­вую от­мет­ку «4» или «5»). Га­ран­ти­ру­ет­ся, что в клас­се есть хотя бы один «хо­ро­шист» или «от­лич­ник». Ис­ход­ные дан­ные объ­яв­ле­ны так, как по­ка­за­но ниже.

21. Вариант. Дан це­ло­чис­лен­ный мас­сив из 30 эле­мен­тов. Эле­мен­ты мас­си­ва могут при­ни­мать зна­че­ния от 150 до 200 — рост уча­щих­ся вы­пуск­но­го клас­са. Опи­ши­те на рус­ском языке или на одном из язы­ков про­грам­ми­ро­ва­ния ал­го­ритм, ко­то­рый поз­во­ля­ет под­счи­тать и вы­ве­сти сред­ний рост среди уча­щих­ся клас­са, вхо­дя­щих в школь­ную бас­кет­боль­ную ко­ман­ду (в ко­ман­ду вхо­дят все уча­щи­е­ся, чей рост боль­ше 180 сан­ти­мет­ров). Га­ран­ти­ру­ет­ся, что в клас­се учит­ся хотя бы один член бас­кет­боль­ной ко­ман­ды.

22. Вариант. Дан це­ло­чис­лен­ный мас­сив из 30 эле­мен­тов. Эле­мен­ты мас­си­ва могут при­ни­мать зна­че­ния от 0 до 100 и со­дер­жат ито­го­вые баллы участ­ни­ков олим­пи­а­ды по ин­фор­ма­ти­ке. Опи­ши­те на рус­ском языке или на одном из язы­ков про­грам­ми­ро­ва­ния ал­го­ритм, ко­то­рый поз­во­ля­ет под­счи­тать и вы­ве­сти сред­ний балл среди участ­ни­ков, став­ших призёрами олим­пи­а­ды (призёрами олим­пи­а­ды стали школь­ни­ки, на­брав­шие более 50 бал­лов). Га­ран­ти­ру­ет­ся, что хотя бы один участ­ник олим­пи­а­ды стал её призёром.

23. Вариант. Дан мас­сив, со­дер­жа­щий 2014 не­от­ри­ца­тель­ных целых чисел, не пре­вы­ша­ю­щих 10 000. Опи­ши­те на одном из язы­ков про­грам­ми­ро­ва­ния ал­го­ритм, поз­во­ля­ю­щий найти и вы­ве­сти сумму всех со­дер­жа­щих­ся в мас­си­ве трёхзнач­ных чисел, де­ся­тич­ная за­пись ко­то­рых окан­чи­ва­ет­ся на 9, но не на 99. Если под­хо­дя­щих чисел в мас­си­ве нет, про­грам­ма долж­на вы­ве­сти число –1. Ис­ход­ные дан­ные объ­яв­ле­ны так, как по­ка­за­но ниже.

 

КЛЮЧЕВЫЕ СЛОВА ЯЗЫКА ПАСКАЛЬ.

---

 

and (энд) - И	Логическая операция И (конъюнкция). if (A>B) and (B
array (эрей) - массив	Тип данных - массив. Bi : array [1..78] of integer;
begin (бегин) - начало	Составные операторы заключаются в операторные скобки begin....end.
case (кейс) - вариант	Оператор выбора. case X of 1 : ch:='один'; 2 : ch:='два'; 3 : ch:='три'; end;
const (конст) - константа	Определение констант: const PI=3.14159; KLmin=1; KLmax=18; LINE='0123456789abcdef';
div (див) - разделить	Деление целых чисел. R := A div B; S := R div 3;
do (ду) - выполнить	Служебное слово в операторах for, while, with. for I:=1 to 12 do writeln(I);
downto (даунту)- уменьшая до	Служебное слово в операторе for. for I:=11 downto 1 do read(A[i]);
else (элс) - иначе	Служебное слово в опереторе if. if A>0 then X:=1 else X:=-1;
end (энд) - конец	Конец действия группы операторов.
file (файл) - файл	Описание данных файлового типа. type KOI7 = file of char;
for (фo) - для	Оператор цикла. for J:=N to M do writeln (J);
function (фанкшн)- функция	Заголовок функции. function INTERVAL(A,B:real):real;
go to (гоу ту)- переход на	Оператор перехода к метке. goto 22;
if (иф) - если	Условный оператор. if TIME>23 then write('good-bye') else write('good-day');
in (ин) - в	Операция определения принадлежности элемента некоторому множеству. if (K in [1..7]) or (C in ['&','*']) then A:=1;
label (лейбл) - метка	Описание метки (целое от 0 до 9999) Label 1,2,3,0027,34;
mod (мод) - модуль	Остаток от деления целых чисел. A:=B mod 2;
nil (нил) - нуль	Kонстанта-указатель для пометки концацепи. top:=NIL;
not (нот) - не	Логическое отрицание. if not(A>B) then FL:=1;
of (оф) - из	Служебное слово в описаниях данных: W: array of real; TV: set of 0..6;
or (ор) - или	Логическая функция дизъюнкции. if A<6 or B=1 then FL:=2;
packed (пэкт) - упаковать	Указатель упаковки данных.SM: packed array [1..200] of char;
procedure() - процедура	Заголовок процедуры: procedure Code(C:char,var N:real);
program (програм) - программа	Заголовок программы: program MaxSum;
readln (pид-э-лайн) - ввод	Пpоцедуpа чтения данных с клавиатуpы. readln(A,B,I,J);
record (рикод) - запись	Запись: DATE=record day : 1..31; month : array [1..3] of char; year : 1990..2000; end;
repeat (рипит) - повторять	Оператор цикла с послеусловием. repeat read(Ch); write(Ch) until Ch=chr(32);
set (сет) - множество	Описание данных множественного типа: VOWEL : set of 'A','E','I','U','Y'; NUMBER : set of 0..9;
then (зен) - то	Служебное слово в операторах 'for' и 'if'.
to (ту) - увеличивая до	Служебное слово в операторе 'for'.
type (тайп) - тип	Обозначение типа данных: type COLOR=(red,blue,green); type NAME = array[1..15] of char;
until (антил) - до	Служебное слово в операторе 'repeat'.
var (вар) - переменная	Заголовок описания переменных: var SUMMA : integer; RU,RT : real; REMARK : array [1..20] of char;
while (вайл) - пока	Оператор цикла с предусловием: while A<16 do A:=A+1;
with (вис) - с	Оператор присоединения для переменных типа 'record' - 'запись'. with DATA do DAY:=15;
writeln (pайт-э-лайн) - вывод	Пpоцедуpа вывода данных на зкpан. writeln('Gamma = ',RU:6:2,'N = ',N); writeln('Data = ',24*T-12*M);