Язык программирования Pascal. Ветвления и циклы. Васильев В.В - 10 стр.

UptoLike

ВУЗ: 

ВГУ | Воронеж

Составители: 

Рубрика: 

10
дура Continue позволяет начать новую итерацию цикла, даже если предыдущая
еще не завершена.
Для циклических программ в качестве исходных данных часто требуется
последовательность случайных чисел . Генерация случайных чисел с помощью
оператора random выдает псевдослучайную последовательность .
Выведем на экран 20 «случайных» целых чисел в диапазоне от 0 до 100.
program Rand;
var i:integer;
for i:=1 to 20 do writeln(random(100));
end. {Rand}
Сколько бы раз Вы не запускали программу на исполнение, на экране Вы
увидите одну и ту же последовательность «случайных» чисел . Ниже дана про -
грамма, в которой случайные числа генерируются впустую до тех пор, пока не
будет нажата клавиша на клавиатуре . Нажатие клавиши определяет случайный
момент начала отбора чисел из псевдослучайной последовательности .
В программе используется функция keypressed логического типа (из биб -
лиотеки crt), которая возвращает значение true, если в буфере клавиатуры есть
хотя бы один символ , еще не прочитанный программой . Если буфер клавиату-
ры пуст, то функция keypressed возвращает значение false.
program Rand;
uses crt;
var x,i:integer;
begin
clrscr;
repeat
x:=random(100)
until keypressed;
for i:=1 to 20 do writeln(random(100));
end. {Rand}
Проверьте работу программы на ПК!
Подготовьтесь к ответам на все(!) контрольные вопросы и выполните
все(!) контрольные задания. Дорогу осилит идущий!
Контрольные вопросы и задания
2.1. Логический тип. Логические операции. Операции отношения.
Булевы выражения
1. Какие значения могут иметь данные булевского типа?
2. Какое служебное слово используется для описания данных логического ти-
па?
3. Что собой представляют порядковые типы данных ?
4. Почему логический тип можно отнести к порядковым типам ?
5. Сколько места в памяти занимают данные логического типа? Почему?
6. Какое значение логического типа больше?
7. Чему равно значение выражения Succ(False)? Pred(True)?

Страницы