#1) в цикле считываем значения с клавиатуры, если значение меньше переменной b то заносим его в переменную min. Цикл повторяется 6 раз #2) считываем значение n, отвечающие за количество обходов в цикле for. В цикле считываем значения в переменную a, затем проверяется следующие условие: "если ((min больше а) и (а делится на 15 без остатка) и (а больше нуля)) то заносим значение переменной а в переменную min. Цикл повторяется n раз. После цикла, переменной b присваевается значение, полученное после деления нацело переменной а на 15. Выводим переменную min и через пробел переменную b. #3) Определяем и выводим наибольшую из переменных a и b.
randomize - процедура инициализации генератора случайных чисел в паскале. В старых версиях паскаля без использования данной процедуры функция random при различных запусках программы выдавала одинаковые последовательности чисел (например, в массиве получалась всегда одинаковая последовательность элементов). Т.е. randomize задает начальное значение последовательности, от которого вычисляются все последующие. При каждом запуске программы это значение будет разным, а значит и результат работы функции random будет различным. Сейчас в процедуре randomize можно указывать параметр: Randomize(seed: integer); При одном и том же значении этого параметра генерируются одинаковые псевдослучайные последовательности (это может быть полезно при отладке программы).
Когда читает книгу (Б)
Объяснение:
Пьёт чай - вкусовая информация
Читает книгу - зрительная информация
Слушает музыку - Слуховая информация