#3 Ввод данных или "Как наладить общение с Pascal?"
Примитивный калькулятор В предыдущих статьях мы с вами уже написали программку, которая складывала 2 целых числа и выводила результат на экран . Вот так выглядит код этой программы, записанный с использованием переменных:
Код
Var a,b,c:integer;
Begin a:=10; b:=15; c:=a+b; Write(c); End. Обратите внимание: команда Write(c); выводит на экран значение, которое хранится в переменной "с". Результат работы программы:
У этой программы есть очень большой недостаток: для того, чтобы с её помощью складывать любые другие числа требуется изменить её код. Было бы гораздо лучше, если бы программа сначала "просила" пользователя ввести нужные ему числа, и лишь затем рассчитывала и выводила на экран результат.
Калькулятор становится умнее
Решение есть! Именно для таких ситуаций в Pascal имеется команда "Read"!
Пример: Код
Var a:integer;
Begin Read(a); Write(a*2); End. Когда программа, доходит до оператора Read, она останавливается и ожидает ввода данных пользователем, затем выводит введённое пользователем число помноженное на 2. Результат работы программы:
Обратите внимание: в программе появилась строка ввода данных. Именно в эту строку пользователь должен ввести данные и нажать Enter, чтобы программа продолжила работу. После того, как пользователь ввёл данные, строка исчезает, а в окне вывода данных появляется результат:
Но вернёмся к нашей программке-калькулятору. Теперь, когда вы знаете как работает команда Read, мы можем улучшить нашу программу:
Код
Var a,b,c:integer;
Begin Read(a); Read(b); c:=a+b; Write(c); End. Результат работы программы:
Обратите внимание: в строку ввода данных вы можете вводить любые целые числа в диапазоне от -2147483648 до 2147483647. Если вам потребовалось произвести вычисление с дробными числами, или с целыми числами не входящими в этот диапазон, то вы должны поменять тип данных ваших переменных в разделе описания переменных Var.
Добавляем пояснения
Последний недостаток нашей программы в том, что программа запрашивает ввод данных, но не уточняет какие данные нужно вводить. Это значит, что другим пользователям ваша программа будет непонятна и они не смогут ей воспользоваться. Чтобы устранить этот недостаток давайте усовершенствуем нашу программку ещё чуть-чуть: заставим Pascal непосредственно перед запросом ввода данных выводить пояснения:
Код
Var a,b,c:integer;
Begin Write('Введите первое число - '); Read(a); Write('Введите второе число - '); Read(b); c:=a+b; Write('Сумма двух чисел - '); Write(c); End. Обратите внимание: команды Write и Read очень часто используются вместе. С помощью команды Write программист поясняет - какого рода данные нужно ввести, а команда Read помещает данные, которые ввёл пользователь в переменную. Результат работы программы:
Задания для самостоятельной работы
| |
Просмотров: 6315 | | |