Генератор случайных чисел (random)

Само название «генератор случайных чисел» уже говорит, о том, что в программировании можно осуществить выдачу случайного числа (компьютер придумывает число).

Для этого вначале программы объявим процедуру Randomize;. Потом присвоим сгенерированное число в переменную. Для этого следует написать функцию random, затем конечное значение, знак «плюс» и начальное значение: a:=random(10)+1;.

Randomize — функция, инициализирующая работу генератора. Вот часть кода, благодаря которой программа «придумывает» любое отрицательное число в диапазоне от -50 до -5:


Randomize;
a:=(-random(50)-5);

Или просто, как вариант, можно домножить на (-1):


Randomize;
a:=(random(50)+5)*(-1);

Задания:

  • Составить программу, которая определяет верно ли найдена пользователем сумма двух чисел (a и b), заданных компьютером.
  • Вывести на экран таблицу Пифагора.
  • Разработать программу, которая проверяет таблицу умножения (10 примеров), высвечивает количество ошибок, правильных ответов и ставит оценку.


Ответы к заданиям предыдущей статьи:

  • Найти квадрат нечетных чисел.

Для примера возьмем 10 чисел. Четное число должно нацело деться на 2, а у нечетного остаток будет равным 1. Поэтому функцией mod проверяем четность числа i и возводим его в квадрат функцией sqr(i).

  • Вывести на экран среднее арифметическое вводимых чисел, сколько введено чисел и их сумму.

Чтобы пользователь смог ввести неограниченное количество чисел, нам понадобится один из двух циклов: либо repeat, либо while. В данной программе мы взяли repeat. Как только пользователь введет 0, условие (until) выполнится, и программа выведет результат. Во время ввода программа высчитывает количество введенных чисел (n) и их сумму (s). Затем остается вычислить их среднее арифметическое. Для этого сумму чисел разделим на количество чисел (s/n). При делении число необязательно получится целым, поэтому назначим тип для переменной i real и выведем две цифры после запятой.

  • Найти сумму делителей числа a.

Структура программ, требующих найти делители любого числа, одна и та же. Достаточно лишь перебрать все числа от единицы до самого числа. В нашем случае делители не могут быть дробными, поэтому те числа, на которые можно разделить число нацело, являются делителями числа. Затем переменной k находим их сумму.

  • Проверить, является ли число совершенным (равным сумме всех его делителей).
  • Выяснить, является ли введенное число неполным (делится только на себя и на единицу).

<<Предыдущая статья                                     Следующая статья >>

Автор

admin

Программист - техник, разработчик сайтов и программного обеспечения, владелец сервера, администратор сайта "Немного о компьютере..."

Один комментарий к “Генератор случайных чисел (random)”

  1. С Новым Годом!
    Пусть в наступающем году
    Приложатся отлично
    Большие денежки к труду
    И счастье в жизни личной!

    Здоровье к телу, свет к душе!
    Чтоб жизнью насладиться,
    Пусть даже то, что есть уже,
    Приятно повторится!!!

Добавить комментарий

Ваш e-mail не будет опубликован. Обязательные поля помечены *