Проект реализуется
Национальным фондом подготовки кадров
|
Дистанционный курс "Паскаль для гуманитариев " > Урок 2 Практическая работа. Первая программа на Паскаль
|
|
|
|
З А Д А Ч А 1.
Составить программу, находящую сумму двух целых чисел, вводимых с клавиатуры.
Результат выводится на экран.
| program summa_chisel; |
{Заголовок программы.} |
| var |
{Начало раздела описания переменных.} |
| a, b, c: integer; |
{Описание трех переменных целого типа.} |
| begin |
{Начало тела программы.} |
| writeln ('Введите два целых числа => '); |
{Вывод на экран запроса входных данных. Данный оператор writeln выведет на экран фразу заключенную в апострофы.} |
| readln (a, b); |
{Ввод значений переменных a и b. После данного оператора первое введенное значение попадет в ячейку памяти, определенную под переменную a, второе введенное значение попадет в ячейку памяти, определенную под переменную b. Значения вводятся с клавиатуры через пробел или нажатие клавиши Enter.} |
| c:=a+b; |
{Переменной c присваивается значение суммы переменных a и b. Содержимое ячеек памяти, выделенных под переменные a и b складывается и помещается в ячейку памяти, выделенную под переменную c.} |
| writeln ('Сумма введенных чисел равна ', c); |
{Вывод на экран полученной суммы. Данный оператор выведет на экран сначала текст, заключенный в апострофы, затем значение переменной c.} |
| writeln ('Нажмите Enter'); |
{Вывод на экран сообщения.} |
| readln; |
{Ожидание нажатия клавиши Enter.} |
| end. |
{Конец программы.} |
Инструкция к началу работы.
- Загрузите среду BP.
- Откройте новое окно редактирования программы. (F10 - File - New)
- Наберите данную программу.
- Запустите программу на выполнение. (Ctrl+F9). Если программа была набрана без ошибок, то на экране появляется сообщение: Введите два целых числа =>
- Курсор будет мигать в следующей строке. Введите два целых числа через пробел и нажмите клавишу Enter. После этого пояляется сообщение: Сумма введенных чисел равна... Нажмите Enter. Вместо точек будет написано значение переменной c. Это сообщение будет на экране до тех пор, пока не будет нажата клавиша Enter.
- Нажмите Enter и вернитесь в режим редактирования программы.
- Сохраните программу на внешнем носителе информации. F10 - File - Save as... В открывшемся окне укажите нужный каталог и имя сохраняемого файла и нажмите Enter.
- Выход из системы программирования - Alt+X.
З А Д А Ч А 2.
Напишите в Паскале:
Фамилия
Имя
Отчество
Класс
ЛГН
 Меню Турбо Паскаль
Обучающие элементы
|
|
|
|
|
|
|
|
|
