Операторы ввода и вывода
Операторы вывода Вывод данных на экран write(x1,x2,….xn) или writeln(x1,x2,….xn), – имена переменных – выражения – просто числа – строки (текст строки должен быть заключен в одиночные кавычки ) Например: writeln ('Сумма равна:, sum); write (5); writeln (a+d, ' ', summ); После выполнения оператора writeln() курсор автоматически переходит в начало новой строки 2
Пример программы var sum,a,b: integer; begin sum:=5+6; writeln('Сумма чисел 5 и 6 равна: ', sum); writeln('Сумма чисел 5 и 6 равна: ', 5+6); a:=5;b:=6; writeln('Сумма чисел 5 и 6 равна: ', a+b) end. Сравните результаты работы операторов writeln
Формат вывода В операторах вывода есть возможность указать ширину поля вывода для каждой выводимой переменной. Для целых чисел и строк writeln (a: w1, b: w2), где w1 и w2 задает ширину поля вывода, Например: а:= 5678; b:= 98765; writeln ( a:6, b:10) ; будет выдано , где - это пустая позиция. st:='фамилия'; st1:= 'имя'; writeln (st,st1:4); будет выдано фамилия имя Для чисел вещественного типа writeln (r1: w:d), w задает общую ширину поля вывода, d - количество знаков дробной части Например: r1:= ; writeln ( r1:8:2); будет выдано 56.79, где это пустая позиция. 4
Пример программы var sum,a,b: integer; st,st1:string; drob:real; begin a:= 5678; b:= 98765; writeln ( 'первый вариант ',a, b) ; writeln ('второй вариант ',a:6, b:10) ; st:='фамилия'; st1:= 'имя'; writeln ('первый вариант ',st,st1); writeln ('второй вариант ',st,st1:4); drob:=417/17; writeln('первый вариант ',drob); writeln('второй вариант ',drob:2:3); end. Сравните результаты работы операторов writeln
Операторы ввода read (x1,x2,….xn); readln (x1,x2,….xn); Вводимые числа должны отделяться друг от друга или пробелом, или нажатием клавиши ENTER после ввода каждого из значений. Например: readln (a, b, c) ; Для ввода надо набрать на клавиатуре 3 числа, разделяя их, например, пробелом. 6 Типы данных, используемые при вводе данных integer real char string
Пример программы var sum,a,b: integer; st,st1:string; drob:real; begin readln(a,b); writeln (a:6, b:10) ; readln(st,st1); writeln ('первый вариант ',st,st1); writeln ('второй вариант ',st,st1:10); end. Сравните результаты работы операторов writeln