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); |
|
