Программный блок содержит операторы, описывающие алгоритм решения задачи.
Для сообщения данных компьютеру служат операторы ввода и вывода. Оператор ввода помещает вводимое значение переменной в отведенную для нее ячейку. Оператор ввода:
read (список имен);
Оператор read(читать) останавливает работу программы и ждет, пока пользователь наберет на клавиатуре число и нажмет < Enter>. Введенное число помещается в оперативную память, в отведенную ячейку. Если список ввода содержит несколько имен, то для каждого надо ввести свое значение. Числа вводятся или через пробел, или через запятую, или нажатием клавиши <Enter>. Например:
read (i, j);
требует ввода двух целых чисел. После работы этого оператора курсор располагается за последним числом, но не переводится на новую строку. Для перевода курсора на новую строку экрана дисплея после ввода данных надо использовать оператор
readln(список имен);
Для вывода результатов работы программы на экран дисплея служит оператор write (список вывода);
Оператор write(писать) выводит данные на экран дисплея. Список вывода — перечисленные через запятую имена результатов или арифметические выражения, являющиеся результатом работы программы. Также в список вывода, для пояснения, входят заключенные в апострофы тексты. Например: write(' х = ', х);
Этот оператор напечатает на экране, начиная с той позиции, где находится курсор, текст, заключенный между апострофами, и значение переменной х из оперативной памяти. Значение будет выведено в форме вещественного числа с плавающей точкой. Чтобы число было выведено в форме с фиксированной точкой, надо после имени соответствующей переменной указать два целых числа, отделив каждое двоеточием. Первое из этих чисел показывает, сколько позиций занимает число (включая десятичную точку и знак числа). Второе равно количеству цифр дробной части числа. Например, для печати числа —23.57 как значения переменной х, оператор печати примет вид:
write ('x = ', х : 6 : 2); На экран будет выдано х=-7
Перевод курсора на новую строку осуществляется оператором пустого вывода
writeln;
Если надо перевести курсор после печати, то применяется
writeln(список вывода);
После вывода результатов работы программы на экран в Турбо Паскаль система так быстро возвращается в редактор текстов программы, что пользователь не успевает увидеть эти результаты. Чтобы задержать изображение, в конце программы следует ставить оператор пустого ввода
readln;
А теперь составим свою программу и посмотрим как работают эти операторы.
4. Практическая работа.
Постановка задачи.
Требуется найти все стороны прямоугольного треугольника с углом 30° по заданному катету, лежащему против угла 30°.