77bff048512e892b6dc7f9fa3fad31bf.ppt
- Количество слайдов: 22
Тема: Составление программ с массивами
Что такое датчик случайных чисел на ЯП Паскаль Научитесь решать задачи на составление программ с использованием «датчика случайных чисел» Особенности разработки программы поиска числа в массиве
Кроссворд «Служебные слова ЯП Паскаль» 6 10 2 8 9 1 4 5 7 3
Обычную книгу можно считать своего рода массивом. Назовите: имя массива – индекс массива – тип элементов массива - Ответ: название книги – имя массива; номер страницы – индекс массива; тип элементов массива – string.
Дом также можно считать массивом. Назовите: имя массива – индекс массива – элемент массива Ответ: почтовый адрес – имя массива. Элементами массива квартиры, индекс массива - номер квартиры.
Шахматную доску можно считать массивом. Почему? Назовите вид массива. Доска состоит из клеток, каждая клетка обозначается буквой и цифрой (двойной индекс). Двумерный массив.
Футбольную команду можно считать «массивом» . Назовите: имя массива – индекс массива – тип элементов массива Ответ: название команды – имя массива; номер игрока – индекс массива; тип элементов массива – String.
Решим задачу: Представим себе игральный кубик, имеющий шесть граней. Зададим конкретное число х. Бросим кубик 3 раза и определим выпало ли загаданное число.
Program Kubik; uses Crt; Var I, x: integer; M : array [1. . 3] of integer; begin Clrscr; Write (‘x=’); Readln (x); For i: =1 to 3 do begin write ('m[', i, ']='); readln(m[i]); end; For i: =1 to 3 do if m [i] = x then writeln (‘yes’) else writeln (‘no’); readln; Pascal end.
В ЯП Паскаль имеется аналог подобного «кубика» , позволяющего самой программе выбирать случайные числа в указанном диапазоне. RANDOM (X) – стандартная функция, датчик случайных чисел из диапазона от 0 до х. Randomize – стандартная процедура, которая производит установку начального состояния датчика случайных чисел.
Pascal Program Random_mas; uses Crt; Var I, x: integer; Ran : array [1. . 3] of integer; Begin Clrscr; Write (‘x=’); Readln (x); Randomize; For i: =1 to 3 do begin ran[i]: =1+random(5); writeln(‘ran[‘, I’]=‘, ran[i]); end; For i: =1 to 3 do if ran[i] = x then writeln (‘yes’) else writeln (‘no’); readln; end.
На уроке отдохнем – физминутку проведем. Любопытная Варвара Смотрит влево…Смотрит вправо. А потом опять вперед. Тут немного отдохнет Шея не напряжена и расслаблена… А Варвара смотрит вверх! Выше всех, все дальше вверх! Возвращается обратно. Расслабление приятно! Шея не напряжена и расслаблена! А теперь посмотрим вниз. Мышцы шеи напряглись. Возвращаемся обратно. Расслабление приятно. Шея не напряжена и расслаблена!
Решение задач
Решим задачу: Представим игральное колесо с вращающейся Определим набор чисел после 10 вращений. 8 3 10 7 9 6 стрелкой. 4 5
Pascal
Групповое задание. Группа 1: Заполнить массив A[1. . 20] случайных чисел диапазона от 5 до 25. Найти сумму A[1] и A[7] элементов. Группа 2: Найти сумму элементов массива. Группа 3: Найти произведение элементов массива. Группа 4: Найти среднее арифметическое элементов массива.
Мини - игра «Поделись улыбкою своей!»
Pascal
На этом занятии мы узнали: Что такое датчик случайных чисел на ЯП Паскаль Научились самостоятельно разрабатывать программы с датчиком RANDOM
1. Знать конспект. 2. Написать программу к следующей задаче: «Задать массив, состоящий из 10 чисел из диапазона [5; 15]. Определить наибольшее. »
Решать задачи можно вечно. Вселенная ведь бесконечна. Спасибо всем нам за урок, А главное, чтоб был он впрок!
Какое выражение из записанных на доске характеризуют ваши ощущения после занятия: q. Я всё знаю, могу объяснить ___________________ q. Я всё знаю, понял, но не уверен ___________________ q. Всё знаю, но не объясню ___________________ q. У меня остались вопросы ___________________


