Оператор ввода

Read( <список переменных> );

Readln( <список переменных> );

После выполнения данного оператора программа останавливается и ждет ввода данных с клавиатуры. Если вводятся числовые данные, то их можно ввести через пробел друг за другом, а можно каждый отдельно нажимая в конце ввода Enter. Переменный в <списке переменных> разделяются запятой.

Ln за словом Read означает, что после ввода следует перевести курсор на следующую строку.

Вводить с клавиатуры можно только значения переменных, но не выражения.

READLN(f,b,a);

read(s);

readln(w);

Оператор вывода.

Write(‘ комментарии ’, < переменные >);

Writeln(‘ ком - рии ’, < переменные >);

Переменный в <списке переменных> разделяются запятой.

Для вывода целых и действительных чисел можно указывать форматы в операторе Write. Формат указывается через двоеточие после переменной.

Write(y:5:2) на вывод значения y отведено 5 позиций, из них 2 на дробную часть.

Writeln(‘y=‘,y:8:3) - восемь позиций, на дробную часть 3.

Writeln(‘М=‘,М:4) - переменная М целого типа, на нее отведено 4 позиции.

Структура программы.

(* комментарии *)

PROGRAM <имя программы >;

USES - модули;

{раздел описаний }

LABEL - описание меток;

CONST - описание констант;

TYPE - описание типов;

VAR - описание переменных;

PROCEDURE - описание процедур;

FINCTION - описание функций;

{начало раздела операторов}

BEGIN

Операторы ввода, вывода и

Обработки данных

END. {конец раздела операторов,

конец программы}

Среди разделов описаний есть раздел описания переменных. Он начинается со служебного слова Var, после которого идет последовательность объявлений переменных, разделенных точкой с запятой. В каждом объявлении перечисляются через запятую имена переменных одного типа, после каждого списка имен переменных ставится двоеточие Var f,a: integer;

g,y1,y2: real;

s,s1,s2: char;

Раздел описания констант начинается со слова CONST.

Пример:

Сonst n=25; r=38;

m=5.15;

Первая программа.

Задача 1: Написать программу, которая вводит значения двух любых чисел, выводит на экран сумму, разность, произведение и частное от деления этих чисел. Ввод каждого числа произвести с отдельной строке. Каждый результат также нужно поместить на отдельную строку, пояснив в комментарии, чему соответствует выводимое число.

program exampl_1;

var a,b: integer;

begin

writeln('Введите первое число’);

readln(a);

writeln('Введите второе число’);

readln(b);

writeln('A+B= ', a+b:5);

writeln('A-B= ', a-b:5);

writeln('A*B= ', a*b:7);

writeln('A div B= ', a div b:5);

writeln('Нажмите <Enter>');