Тема: Операторы вывода. Цель: 1. Познакомиться со структурой программы.
Оператор вывода -
Оператор вывода: Write(выводимые величины); - текст Write(хорошо); хорошо _
Оператор вывода: Write(выводимые величины); - число Write(2,5,4); 254 _
Оператор вывода: Write(выводимые величины); - число Write(2,,5,,4); _
Оператор вывода: Write(выводимые величины); - арифметическое выражение Write(5*2-3); 7 _
Оператор вывода: Write(выводимые величины); - переменные Write(S); 10 _
Оператор вывода: Writeln(выводимые величины); После вывода курсор переводится на следующую строку. - число Writeln (2,,5,,4); _
Оператор вывода: Writeln; Перевод курсора на следующую строку. Writeln; _
Форматы вывода числа. Значение ХВыражение Результат 134Write ( x )134 (с позиции курсора) 134Write ( x :10)*******134 (крайняя правая позиции поля шириной 10) 234,36Write ( x ) E+02 (с плавающей точкой) 234,36Write ( x : 8 : 2)** (с фиксированной точкой) 234,36Write ( x : 8 : 4) ,36Write ( x :10 : 1)*****234.4
Форматы вывода чисел. Значение A, BВыражение Результат 3 и 45Write ( A, B )345 (с позиции курсора) 3 и 45Write (A=, A,*B=, B)A=3 B=45 3 и 45Writeln ( A, B) и 45Write (A : 4, B : 4)***3**45 (крайняя правая позиция) 3 и 45Writeln ( A:4, B:4)***3 **45 3 и 45Writeln (A=, A:4, B=, B:4) A=***3 B=**45 3 и 45Write (A:4); Write (B:4); ***3 **45
12 Вывод текста на экран program qq; begin write('2+'); { без перехода } writeln('2=?'); { на новую строку} writeln('Ответ: 4'); end. program qq; begin write('2+'); { без перехода } writeln('2=?'); { на новую строку} writeln('Ответ: 4'); end. Протокол: 2+2=? Ответ: 4
13 Вывод текста на экран program qq; Uses CRT; { подключение модуля } Begin TextBackGround(12); { цвет фона } СlrScr; { очистка экрана } TextColor(13); { цвет текста } write('2+'); { без перехода } writeln('2=?'); { на новую строку} writeln('Ответ: 4'); end. program qq; Uses CRT; { подключение модуля } Begin TextBackGround(12); { цвет фона } СlrScr; { очистка экрана } TextColor(13); { цвет текста } write('2+'); { без перехода } writeln('2=?'); { на новую строку} writeln('Ответ: 4'); end.