 |
 |
 |
 |
|
 |
 |
60
В приводимом ниже алгоритме для формирования и вывода последовательности случайных
точек на экране используется цикл со счетчиком и датчик случайных чисел для генерации коорди-
нат «звезд».
Алгоритм
Программа
алг «звездное небо»
' звездное небо
нач
сls
запрос(«звезд=», п)
input «звезд=», n
графический_экран
screen 2,0
от k = 1 до п цикл
for k = 1 to n
x: = случайное [0:200]
х = rnd*200
у: = случайное [0:200]
у = rnd*200
точка (х,у)
pset (x,y),3
кцикл
next k
кон
end
Второй пример - составление с использованием спецификаций алгоритма и программы иг-
ры «Угадай-ка». В этой игре ЭВМ «загадывает» число от 0 до 100, а человек должен его отгадать,
вводя пробные числа с клавиатуры. Для составления алгоритма и программы примем следующий
сценарий:
Сценарий «Угадай-ка»
Угадай число от 0 до 100
число =
х
*
мало
много
молодец, умница
Для реализации этого сценария воспользуемся циклом с выходом, в котором задается во-
прос число=? и проверяются числа, вводимые человеком. Выход из цикла происходит после сов-
падения ответа с числом, задуманным ЭВМ:
Алгоритм
Программа
алг «угадай-ка»
' угадай-ка
нач
сls
вывод («Угадай число»)
print «Угадай число»
вывод («от 1 до 100»)
print «от 1 до 100»
z: = случайное [0:100]
z = int (rnd* 100)
цикл
do
запрос( «число=», х)
input «число=», х
при х = z вых
if х = z then exit do
если х < z то
if х < z then
вывод («мало»)
print «мало»
инеc х > z то
elseif х > z then
вывод («много»)
print «много»
все
end if