Новые вопросы по информатике
Сколько всего различных символов может быть в восьмибитной текстовой кодировке? 1) 8 2) 512 3) 256 4) 65536
Паскаль. Написать программу подсчета количества отрицательных чисел среди любых 10 вводимых. 1 программа с использованием while, 2 программа — repeat
Сколько кб информации содержит сообщение объемом 2^20 бит?
Информатика пользователь создад сообщение из 256 символов в кодировке Unicode в которой каждый символ кодируется 16 битами после редактирования информационный объем сообщения составил 3072 бит Определите сколько символов удалили сообщение если его
Запишите числа в беззнаковом коде (формат 1 байт): а) 31; б) 163; в) 65; г) 128.
Главная » Информатика » Создать одномерный массив С из 12 целых элементов. Числа вводит пользователь с клавиатуры. Вывести на экран массив в виде строики чисел. (язык Паскаль)
Источник: urokam.net
ИНФОРМАТИКА 9 класс: Массивы в Паскале | Одномерные массивы. Описание, заполнение вывод массива
Урок 10.04.23. Практическая работа 12 Решение задач на обработку массивов
Единственный в мире Музей Смайликов
Самая яркая достопримечательность Крыма
Скачать 16.61 Kb.
Практическая работа № 12 Решение задач на обработку массивов
Цели: закрепить навыки в составлении программ на обработку массивов развить умения обобщать, систематизировать и применять знания, полученные ранее. отработать навыки решения задач
Оценивание выполнения практической работы :
на оценку 3 решить 1 задачу (начальный уровень)
на оценку 4 решить 1 и 2 задачи (начальный уровень) и (средний уровень)
на оценку 5 решить Высокий уровень.
- Запустить на компьютере Паскаль АВС
- Набрать программу на компьютере, выполнить ее, получить результат.
- Записать условия задач в тетрадь, составить к задачам и записать в тетрадь блок-схемы, программы и результат выполнения программ.
Дан целочисленный одномерный массив, состоящий из n элементов. Найти сумму и произведение нечетных элементов, кратных 3.
Введем обозначения: n – количество элементов в массиве; А – имя массива; i – индекс элемента массива; Ai – i-й элемент массива A; s – сумма нечетных элементов массива, кратных 3; p – произведение нечетных элементов массива, кратных 3.
Входные данные: n, A.
Выходные данные: s, p.
Первоначально сумма искомых элементов равна нулю: не просуммировано ни одно слагаемое, то есть s:=0. Далее, используя любой оператор цикла, просматриваем весь массив от первого и до последнего элемента. И если при этом элемент массива нечетный и кратен 3, то к уже накопленной сумме добавляется очередное слагаемое, т.е. s:= s + A[i]. Здесь слева и справа от знака присваивания записано имя одной и той же переменной s, именно это обеспечивает постепенное накопление суммы: s справа – уже вычисленное известное значение суммы, s — ее новое, вычисляемое значение.
Задачи с массивами | Pascal | Сумма и поиск элементов
При просмотре массива можно сразу вычислить и произведение элементов массива, удовлетворяющих заданному условию. Произведение вычисляется с помощью оператора p:=p*A[i]. При этом p справа и p слева имеют разные значения: p справа – уже известное, вычисленное ранее значение произведения, p слева – новое, вычисляемое его значение. Первоначально искомое произведение равно единице, т.е. p:=1.
При решении этой задачи можно использовать любой из видов циклов. Рассмотрим один из вариантов решения задачи. Для решения используем цикл с параметром, поскольку число повторений в цикле нам известно(n).
Var A: Array[1..20] Of Integer;
i, n, s, p: Integer;
Write (‘n=’); Readln (n);
For i:=1 To n Do Readln (A[i]);
If (A[i] mod 2 0) and (A[i] mod 3 = 0) Then
Writeln (‘s=’, s, ‘p=’, p);
К данной программе в тетради составить блок-схему.
2. составить математическую модель, блок-схему и программу (средний уровень)
Задача 2. Дан массив целых чисел. Найти количество тех элементов, значения которых положительны и не превосходят заданного натурального числа А.
Составьте программу, которая в одномерном массиве размерностью 12 (элементы случайные числа из промежутка от 1 до 9) подсчитывает количество чётных элементов. Пояснение Обратите внимание, что условием чётности элемента будем выводить через функцию mod (целочисленный остаток от деления). Четные числа делятся на 2 с нулевым остатком: if w[i] mod 2=0 then k:=k+1
Задача 2.
Составьте программу, которая в одномерном массиве размерностью 12 (элементы массива случайные числа из промежутка от 0 до 6) находит количество элементов равных 3
Пояснение
Обратите внимание, что переменная k — счетчик, поэтому начальное значение переменной обнуляем. Условие для подсчета элементов равных 3: if w[i]=3 then k:=k+1, т.е. если элемент равен 3, то k увеличивается на 1.
Домашнее задание:
Источник: topuch.com
Практическая работа. Примеры решения задач
2. Набрать программу на компьютере, выполнить ее, получить результат.
3. Записать условия задач в тетрадь, составить к задачам и записать в тетрадь блок-схемы,
программы и результат выполнения программ.
Вычисление суммы и произведения элементов массива, удовлетворяющих заданному условию.
Задача 1. Дан целочисленный одномерный массив, состоящий из n элементов. Найти сумму и произведение нечетных элементов, кратных 3.
Введем обозначения: n – количество элементов в массиве; А – имя массива; i – индекс элемента массива; Ai – i-й элемент массива A; s – сумма нечетных элементов массива, кратных 3; p – произведение нечетных элементов массива, кратных 3.
Входные данные: n, A.
Выходные данные: s, p.
Первоначально сумма искомых элементов равна нулю: не просуммировано ни одно слагаемое, то есть s:=0. Далее, используя любой оператор цикла, просматриваем весь массив от первого и до последнего элемента. И если при этом элемент массива нечетный и кратен 3, то к уже накопленной сумме добавляется очередное слагаемое, т.е. s:= s + A[i]. Здесь слева и справа от знака присваивания записано имя одной и той же переменной s, именно это обеспечивает постепенное накопление суммы: s справа – уже вычисленное известное значение суммы, s — ее новое, вычисляемое значение.
При просмотре массива можно сразу вычислить и произведение элементов массива, удовлетворяющих заданному условию. Произведение вычисляется с помощью оператора p:=p*A[i]. При этом p справа и p слева имеют разные значения: p справа – уже известное, вычисленное ранее значение произведения, p слева – новое, вычисляемое его значение. Первоначально искомое произведение равно единице, т.е. p:=1.
При решении этой задачи можно использовать любой из видов циклов. Рассмотрим один из вариантов решения задачи. Для решения используем цикл с параметром, поскольку число повторений в цикле нам известно( n ).
Program Primer 1_1;
Var A: Array[1..20] Of Integer;
i, n, s, p: Integer;
Write (‘n=’); Readln (n);
For i:=1 To n Do Readln (A[i]);
For i:=1 To n Do
If (A[i] mod 2 <>0) and (A[i] mod 3 = 0) Then
Writeln (‘s=’, s, ‘p=’, p);
К данной программе в тетради составить блок-схему.
Нахождение количества элементов, удовлетворяющих заданному условию
Задача 2. Дан массив целых чисел. Найти количество тех элементов, значения которых положительны и не превосходят заданного натурального числа А.
Введем обозначения: n – количество элементов в массиве; X – имя массива; i – индекс элемента массива; Xi – i-й элемент массива X; А – заданное число; k – количество элементов, значения которых положительны и не превосходят заданного числа А.
Входные данные: n, X, A.
Выходные данные: k.
Вводим с клавиатуры значение числа А. Количество элементов, значения которых положительны и не превосходят заданного числа А, вначале полагаем равным нулю, то есть k:=0. Если очередной элемент массива положителен и не превосходят заданного числа A, то количество таких элементов нужно увеличить на единицу, то есть k:=k + 1. Таким образом, обрабатываются все элементы массива.
При решении этой задачи можно использовать любой из видов циклов. Рассмотрим один из вариантов решения задачи. Для решения используем цикл с предусловием:
Program Primer 2_1;
Var X: Array[1..20] Of Integer;
i, n, k, A: Integer;
Write (‘n=’); Readln (n);
For i:=1 To n Do Readln (X[i]);
Write (‘A=’); Readln (A); k:= 0; i:=1;
К данной программе составить блок-схему.
Нахождение номеров элементов, обладающих заданным свойством
Задача 3. Найти номера четных элементов, стоящих на нечетных местах.
Введем обозначения: n – количество элементов в массиве; X – имя массива; i – индекс элемента массива; Xi – i-й элемент массива Х.
Входные данные: n, X.
Выходные данные: i.
Необходимо просмотреть весь массив. Если просматриваемый элемент является четным, а его порядковый номер – нечетный, то вывести его номер. При решении этой задачи можно использовать любой из видов циклов.
Составим программу с помощью цикла с параметром:
Program Primer3_1;
Var X: Array[1..20] Of Integer;
Write (‘n=’); Readln (n);
For i:=1 To n Do Readln (X[i]);
For i:=1 To n Do
If (X[i] mod 2 = 0) and (i mod 2<>0) Then Write (i:5);
Задача 4. Найти номер последнего отрицательного элемента массива.
Введем обозначения: n – количество элементов в массиве; А – имя массива; i – индекс элемента массива; Ai – i-й элемент массива A; m – номер последнего отрицательного элемента массива.
Входные данные: n, A.
Выходные данные: m.
Последний отрицательный элемент массива – это первый отрицательный элемент, который встретится при просмотре массива с конца. Если очередной элемент не является отрицательным, то нужно уменьшать значение текущего индекса (i:=i-1), пока он не станет меньше номера первого элемента или не будет найден отрицательный элемент. Переменная m получает значение i (номер отрицательного элемента), т.е. m := i. Если в массиве нет отрицательного элемента, то значение переменной m остается равным нулю.
Program Primer3_2;
Var A: Array[1..n] Of Integer;
For i:=1 To n Do Readln (A[i]);
While (i >= 1) and (A[i] >=0) Do i:=i-1; m:=i;
К данной программе составить блок-схему.
Записать в тетрадь программы , блок-схемы, результаты работы программ.
Задания для самостоятельной работы
Задача 1 . Составьте программу, которая в одномерном массиве размерностью 12 (элементы случайные числа из промежутка от 1 до 9) подсчитывает количество чётных элементов. Пояснение Обратите внимание, что условием чётности элемента будем выводить через функцию mod (целочисленный остаток от деления). Четные числа делятся на 2 с нулевым остатком: if w[i] mod 2=0 then k:=k+1
Задача 2 . Составьте программу, которая в одномерном массиве размерностью 8 (элементы массива случайные числа из промежутка от 15 до 100) находит максимальный элемент.
Задача 3. Составьте программу, которая в одномерном массиве размерностью 12 (элементы массива случайные числа из промежутка от 0 до 6) находит количество элементов равных 3
Пояснение
Обратите внимание, что переменная k — счетчик, поэтому начальное значение переменной обнуляем. Условие для подсчета элементов равных 3: if w[i]=3 then k:=k+1, т.е. если элемент равен 3, то k увеличивается на 1.
Источник: znanio.ru