Урок #1: "Привет мир!" -- начинаем программировать на языке Pascal
Primary tabs
ВНИМАНИЕ: рекомендуем начинать отсюда.
Привет мир! ;)
Итак, в одной из сред программирования (например, тут) напишем такой код (поздороваемся с миром):
program HelloWorld; // название программы + точка с запятой begin writeln('Привет Мир!'); end.
В средах разработки, которые для вывода используют командную строку (окно консоли), придётся задержать закрытие консоли таким приёмом (ожидание ввода значения переменной):
program HelloWorld; var // секция объявления переменных x :integer; //объявим целочисленную переменную begin writeln('Привет Мир!'); read(x); // ожидаем ввода (который всегда заканчивается нажатием Enter) end.
В Lazarus из главного меню данный код можно запустить так:
Файл -> Создать -> Проект -> Программа
Возможно, придётся предварительно исправить такую ошибку.
Работает с переменными
Переменные бывают разных типов, мы же пока объявим несколько переменных типа integer -- то есть целочисленных и произведём операции с ними:
program PromramIntegerTest; var x, y, // объявляются, через запятую, если их несколько z :integer; // в конце в любом случае указывается тип (здесь - три переменных одного типа) a, b: integer; { переменные через запятую можно перечислять и в одну строку, но тогда не удобно отдельно прокомментировать назначение каждой из них. Обратите внимание на этот комментарий - он многострочный (окружён фигурными скобками) } begin a := 1; // операция присваивания значения b := 3; z := b + 22; // складываем переменную и числовой литерал x := (a + b)*z - b; // присваиваем результат более сложного выражения writeln('Получаем значение: ', x); b := z mod b; writeln('Остаток от деления z на b равен ', b); read(x); // ожидаем ввода (который всегда заканчивается нажатием Enter) end.
Обратите внимание на название программы, данный стиль написания называется CamelCase.
Пример использования пользовательского ввода + цикл и оператор условия (вектвления)
Рассмотрит такую программу, где используется одна переменная вещественного типа, но при этом есть цикл и оператор условия. который в определённой ситуации завершает выполнение кода:
{Программа вывода квадратного корня числа, введённого пользователем} program SqrtProgram; var x: real; // объявим переменную вещественного типа begin repeat // цикл с пост-условием write('Введите число: '); // приглашение (не обязательно) read(x); // чтение из стандартного потока ввода if (x >= 0) then // проверка условия (оператор "больше или равно") writeln('Корень из числа = ', sqrt(x)) // точка с запятой перед else не ставится else writeln('Ошибка в параметре!'); until x = 0; // условие writeln('Цикл завершён'); end.
Модифицируйте код последнего примера следующим образом:
- так чтобы она завершалась при вводе положительного числа, а при вводе отрицательного или нулевого возводила введённное значение в квадрат.
- также как и в предыдущем пункте, но пусть выход из цикла осуществляется, если число больше делится на 5 без остатка
- также как и первый пункт, но на экран выводить сумму модуля и квадрата числа (если число не положительно)
Задачи к уроку
- Log in to post comments
- 28010 reads