Уважаемые пользователи!
Сегодня вышел первый урок по языку программирования Pascal. Для работы с ним необходимо установить компилятор, желательно лицензионный. Мы подготовили для Вас лицензионную версию Free Pascal и Pascal ABC.NET:
В настоящее время мы будем обновлять только Pascal ABC.NET.
Если на Вашем компьютере осталось менее 300 MB настоятельно не рекомендуем устанавливать компилятор Pascal ABC.NET, а если меньше 100MB, то воспользуйтесь онлайн-компилятором по адресу http://pascalabc.net/WDE/.
ВНИМАНИЕ! Если Вы желаете участвовать в Олимпиадах/конкурсах, то потрудитесь очистить компьютер и установить Free Pascal.
Теперь, когда Вы установили компилятор, необходимо протестировать его работу(инструкции по установке читайте здесь). Теперь нужно сделать для теста первую программу. Откройте компилятор. Перед Вами возникло окно:
Нажмите "File", а далее "New". Мы видим синее окно из заголовка, панели, панели инструкций:
В этом синем окне с заголовком "noname01" Вы напишите ту самую первую программу, но для начала поймем структуру и логику языка программирования Pascal, пропишем код.
При всем этом end. обязательно прописать с точкой. Теперь давайте напишем программу, которая будет выводить сообщение на экран, но для начала разберемся с тремя терминами, Pascal язык серьезный и требует серьезного отношения к себе.
ПОНЯТИЯ:
Компьютерная программа- это набор элементарных команд процессора, предоставленных в файле в виде последовательных битов (машинный код).
Алгоритм- строгое, формальное, не допускающее неоднозначностей и двусмысленностей описание процесса решения задачи.
Компиляция- перевод (трансляция) исходного текста в конкретные команды процессора, выполняется очень быстро.
Для любопытных. За секунду компилятор может проанализировать и транслировать от 500 до 2900 строк кода. Однако, ВНИМАНИЕ:
Процесс создания алгоритма- самый важный. Если в нем были допущены ошибки, то устранить их на этапе кодирования весьма трудно.
Теперь можно и написать компьютерную программу на языке программирования Pascal:
| Алгоритм для Free Pascal |
Алгоритм для Pascal ABC.NET |
- подключить модуль сrt
- начало
- вывести на экран строку "Привет,мир!"
- Задержка экрана
- конец.
|
- начало
- вывести на экран строку "Привет, мир!"
- конец алгоритма.
|
ВНИМАНИЕ! Программа в Free Pascal отличается написанием алгоритма и кода в связи с разными возможностями компилятора, например: в Pascal ABC.NET сообщение само будет удержано на экране, а в Free Pascal нужно сделать указание. В Free Pascal рекомендуется чистка экрана ClrScr;, но в этом уроке опустим эту деталь.
Для любопытных отвечу, что ClrScr; ставится в Free Pascal между второй и третей строкой алгоритма.
Теперь переведем этот алгоритм в код Pascal:
- write- после окончания вывода значений не выполняет перевод курсора на следующую строку
- writeln- после окончания вывода значений выполняет перевод курсора на следующую строку
| Программа для Pascal ABC.NET |
Программа для Free Pascal |
- begin //начало
- write ('Привет, мир!);
- end.
|
- uses crt;
- begin
- write ('Привет,мир!');
- while not keypressed do;
- end.
|
Теперь в программе для Free Pascal поясню while not keypressed do здесь с английского "пока не нажата клавиша делать", что делать не сказано, скорее всего пустое действие, выход, а это то, что нам нужно. Эта команда ждет пока Вы нажмете клавишу(любую).
В Паскале есть функция чтения, все все прочитанные данные можно вывести на экран, но в то же время для чтения данных нужна ячейка памяти, например, как x из школьной программы. Переменные имеют типы данных, например: символический(char), подробно о них мы поговорим во втором уроке. Сейчас мы сделаем экран приветствия, нет нет при включении он активироваться не будет, а по требованию будет.
Напишем программу приветствия, которая будет содержать: одну переменную (x), а тип данных char, начало и конец, вывод слова "Здравствуйте," посредством команды write, прочитаем и проанализируем данные строкой read(от англ."чтение"), вывести полученные данные через один знак от запятой:
| Программа для Pascal ABC.NET |
Программа для Free Pascal |
- var x:char;
- begin
- write ('Здравствуйте, ' ,x);
- read(x);
- end.
|
- uses crt;
- var x:char;
- begin
- write('Здравствуйте, ',x);
- read (x);
- while not keypressed do;
- end.
|
Фактически эта программа работает только за счет Вас, а именно Вы должны ввести имя, но эта программа после внедрения x в строку write до чтения read имеет свойство читать символы на ходы и записывать их в ячейку памяти.
Мы получили программу с единой строкой "Здравствуйте, user", здесь специально вывел user т.к всех зовут по разному, а еще это служит важным замечанием того, что char может обрабатывать иностранные символы.
На этом все, а для закрепления знаний попробуйте сделать программу, которая будет выводить на экран два сообщения на экран, например:
Введите Ваше имя: (читать)
Здравствуйте, user(прочитано, вывод)!
|