Практическое задание №27 Тема: Датчик слу¬чайных чисел в Паскале. Поиск чисел в массиве
план-конспект занятия по информатике и икт (9 класс) по теме
Практическое задание №27
Тема: Датчик случайных чисел в Паскале. Поиск чисел в массиве
Скачать:
Вложение | Размер |
---|---|
![]() | 13.28 КБ |
Предварительный просмотр:
Практическое задание №27
Тема: Датчик случайных чисел в Паскале. Поиск чисел в массиве
Задание:
- Изучите пример программы поиска числа в массиве.
- Составить блок-схему и написать программу.
Порядок выполнения:
Задание №1. Датчик случайных чисел в Паскале. Поиск чисел в массиве
Пример: программа поиска числа в массиве
Program Example;
{Программа заполняет массив Rand случайными числами в диапазоне от 0 до 50,
вводит число Х, и вычисляет, сколько раз Х входит в массив Rand}
Var Rand: array[1..20] of integer;
I, X, NumberX : integer,
Begin
{Установка датчика случайных чисел}
Randomize;
{Заполнение массива случайными числами и вывод их на экран}
Writeln(‘Массив случайных чисел:’)
For I:=1 to 10 do
begin
Rand[I]:=random(50); Write(Rand[I]:4)
End;
Writeln;
{Ввод Х}
Write(‘Введите Х:’)); Readln(X);
{Подсчет числа вхождений Х в массив}
NumberX:=0;
For I:=1 to 10 do
If Rand(I)=X then NumberX:=NumberX+1;
{Анализ и вывод результата}
If NumberX=0
Then writeln(‘В массиве нет числа’,X)
Else writeln(‘Число’,X,’в массиве присутствует’,NumberX,’раза’)
End.
Задание №2. Написать программу, которая вводит массив из N целых чисел и выводит на экран элементы, кратные числу K. Протестировать программу на следующих исходных данных:
а) k=3 Массив: 2 6 -9 4 5 12 -15
б) k=4 Массив: 9 0 8 124 -16 11 19
По теме: методические разработки, презентации и конспекты

Практическое задание по теме"Строение кровеносной системы"
Задание для самостоятельной работы с учебником....
Практическое задание по теме "Вложенные циклы"
задания-шаблоны...

Практическое задание №12 Тема: Итоговая практическая работа по БД
Практическое задание №12Тема: Итоговая практическая работа по БД...

Практическое задание №26 Тема: Разработка программы с использованием одномерных массивов на языке Паскаль
Практическое задание №26Тема: Разработка программы с использованием одномерных массивов на языке Паскаль...

Практическое задание №4 Тема: Способы поиска в Интернет
Практическое задание №4Тема: Способы поиска в Интернет...

Практическая работа по темам: "Модуль числа", "Сложение чисел с помощью координатной прямой"
Практическая работа по темам: "Модуль числа", "Сложение чисел с помощью координатной прямой"...

Контрольные задания по теме "Умножение и деление чисел, полученных при измерении, на круглые десятки" для обучающихся с интеллектуальными нарушениями 7 класс.
Контрольные задания по теме "Умножение и деление чисел, полученных при измерении, на круглые десятки" для обучающихся с интеллектуальными нарушениями 7 класс....