#3 Ввод данных или "Как наладить общение с Pascal?"

Примитивный калькулятор

 
В предыдущих статьях мы с вами уже написали программку, которая складывала 2 целых числа и выводила результат на экран . Вот так выглядит код этой программы, записанный с использованием переменных:
 
Код
Var a,b,c:integer;
Begin
 a:=10; 
 b:=15;
 c:=a+b;
 Write(c);
End.  
 
Обратите внимание: команда Write(c); выводит на экран значение, которое хранится в переменной "с". Результат работы программы:
 
 
У этой программы есть очень большой недостаток: для того, чтобы с её помощью складывать любые другие числа требуется изменить её код. Было бы гораздо лучше, если бы программа сначала "просила" пользователя ввести нужные ему числа, и лишь затем рассчитывала и выводила на экран результат. 
 
Калькулятор становится умнее
 
Решение есть! Именно для таких ситуаций в Pascal имеется команда "Read"!
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 помещает данные, которые ввёл пользователь в переменную. Результат работы программы:
 
 
 
Задания для самостоятельной работы
 
Напишите программу, которая вычисляет средний рост четырёх ваших друзей. Алгоритм программы:
 

 

 

 
Подсказка: переменная S, в которой будет находится результат, должна иметь тип Real, так как для расчёта среднего роста используется операция деления и ответ может представлять собой дробное число.
 
Ваши вопросы и комментарии можете оставлять ниже.
Начинайте программировать прямо сейчас!
 
Категория: Первые шаги | Добавил: Decay_Dance (02.02.2014)
Просмотров: 1805 | Теги: дробный тип данных, наука детям, Оператор ввода данных, простейший калькулятор, переменные | Рейтинг: 5.0/3