Как создавать игры в паскале - Pascal ABC

Узнай цену своей работы

Формулировка задачи:

Здрасть. Я хочу учиться на программиста, но я пока даже не знаю, как писать игры в паскале. Хочу это исправить. Нужна ваша помощь: какие служебные слова используются для этого и что они значат, как правильно их вписывать в паскале и пример простой игры, если можно. Заранее спасибо.

Решение задачи: «Как создавать игры в паскале»

textual
Листинг программы
uses
  crt;
var
  N,z,c:integer;
begin
  repeat
    write('введите диапазон: '); readln(N);
  until N>0;
  z:=random(N)+1;
  repeat
    write('> '); readln(c);
    if c>z then writeln('меньше')
    else
    if c<z then writeln('больше')
    else
    if c=z then writeln('вы отгадали число');
  until c=z;
end.

Объяснение кода листинга программы

  1. В первой строке используется библиотека crt, которая является стандартной для языка Pascal ABC.
  2. Переменные N и z объявлены как целочисленные типы данных.
  3. В цикле repeat-until запрашивается у пользователя ввести диапазон чисел. Число, введенное пользователем, сохраняется в переменной N.
  4. Затем генерируется случайное число от 1 до N с помощью функции random(N)+1. Это число сохраняется в переменной z.
  5. Цикл repeat-until используется для повторного запроса числа от пользователя, пока введенное число больше или равно z.
  6. Если число, введенное пользователем, больше или равно z, то выводится сообщение меньше.
  7. Если число, введенное пользователем, меньше z, то выводится сообщение больше.
  8. Если число, введенное пользователем, равно z, то выводится сообщение вы отгадали число.
  9. Цикл repeat-until останавливается, когда число, введенное пользователем, равно z.
  10. Код завершается без использования вложенных списков.

Оцени полезность:

8   голосов , оценка 3.875 из 5