Читайте также:
|
|
Оператор записи writeln аналогичен оператору write, но после вывода последнего в списке значения для текущего оператора writeln происходит перевод курсора к началу следующей строки. Оператор writeln, записанный без параметров, вызывает перевод строки. Для пояснения работы оператора writeln приведем фрагмент программы:
a:=4;b:=6;c:=55;
write(a:3);write(b:3);write(c:3);
Summa:=a+b+c; writeln('a=',a); writeln('b=',b); writeln('c=',c); writeln('сумма a+b+c равна',Summa);
Результат выполнения: 4 6 55 a=4
b=6
c=55
Сумма a+b+c равна 65.
Примером использования формата в операторе writeln может служить следующая программа.
Program Prim; Программа вычисляет площадь прямоугольника и выводит на печать результат
Var A,B,Pl:integer; A,B - длина сторон, Pl - площадь
Begin
A:=8;B:=4;
Pl:=A*B; writeln(Lst,'--------------------');
writeln(Lst,'!Сторона A!Сторона B!Площадь!');
writeln(Lst,'-------------------------------');
writeln(Lst,'!',A:7,B:11,Pl:11,'!':5);
writeln(Lst,'-------------------------------'); End.
В результате работы программы получим таблицу:
Сторона A!Сторона B!Площадь!
8 4 32!
Каждая строка которой будет печататься с первой позиции новой строки печатающего устройства.
8.6. Пример программы организации ввода-вывода данных стандартных скалярных типов
Исходные данные: K=-73, L=12, M=21425, X=-4192.21, Y=21.345, S1='*', S2='V', S3='F' вывести двумя способами: в стандартной форме и указанием ширины поля вывода, при этом выводимую информацию необходимо снабдить заголовками.
Program inout(input,output); const log=true;
var k,l,m:integer;x,y:real;s1,s2,s3:char;
begin writeln('введи целые числа k,l,m:');
read(k,l,m);
writeln(' ':30, 'целые числа');
writeln(' ':15, 'стандартный формат',' ':12,
'заданная ширина поля');
writeln(' ',k,l,m,' ':5,'k=',k:3,'l=',l:2,'m='
,m:5);
writeln;writeln('введи вещественные числа x,y:');
readln(x,y);
writeln(' ':25,'вещественные числа');
writeln(' ':5,'стандартный формат',' ':18,'заданная
ширина поля');
writeln(' ':5,x,y,' ':10,'x=',x:8:2,'y=',y:6:3);
writeln;writeln('введи символы s1,s2,s3:');
readln(s1,s2,s3);
writeln(' ':20,'символьные переменные:','s1=',s1,
's2=',s2,'s3=',s3);
writeln('печать символьных переменных с шириной поля 5:'
,s1:5,s2:5,s3:5);
writeln('логическая переменная=',log);
end.
ПРОТОКОЛ РАБОТЫ ПРОГРАММЫ: введи целые числа k, l, m: -73 12 21425
целые числа
стандартный формат заданная ширина поля
-73 12 21425 k=-73 l=12 m=21425
введи вещественные числа x,y: -4192.21 21.345
вещественные числа
стандартный формат заданная ширина поля
-4.192210E+03 2.134500E+01 x=-4192.21 y=21.345
введи символы s1,s2,s3 *VF
символьные переменные s1=* s2=V s3=F
печать символьных переменных с шириной поля 5: * V F
логическая переменная = true
ТРЕБОВАНИЯ К ЗНАНИЯМ И УМЕНИЯМ СТУДЕНТОВ
В результате выполнения лабораторной работы студенты должны знать:
-операторы ввода-вывода;
-форматы оператора вывода для различных стандартных скалярных типов данных;
должны уметь:
-организовывать ввод-вывод данных стандартных скалярных типов.
План 2002/2003, поз. 134
КлещикТатьянаВладимировна
Дата добавления: 2015-07-11; просмотров: 86 | Нарушение авторских прав
<== предыдущая страница | | | следующая страница ==> |
Операторы ввода read, readln | | | Общие сведения |