Студопедия — Особенности вывода вещественных значений.
Студопедия Главная Случайная страница Обратная связь

Разделы: Автомобили Астрономия Биология География Дом и сад Другие языки Другое Информатика История Культура Литература Логика Математика Медицина Металлургия Механика Образование Охрана труда Педагогика Политика Право Психология Религия Риторика Социология Спорт Строительство Технология Туризм Физика Философия Финансы Химия Черчение Экология Экономика Электроника

Особенности вывода вещественных значений.






1) Write(R); (экспоненциальная форма):

 

| - d.dddddddddd E +|- dd

 

2) Write(R:N);

 

3) Write(R:N:M); (0<=M<=24).

 

Например,

VAR B,d:real;

C:integer;

A:string[10];

...

A:=’книга’;

B:=1253E-5;

C:=12;

d:=1253E2;

Write(LST,’B=’,B:10:3,’ C=’,C:8,’ A=’,A:7,’ b1=’,b:8,’ d=’,d:6);

 

В=_ _ _ _ _ 0.013_С=_ _ _ _ _ _12_А=_ _книга_B1=_1.3E-02_D=_1.3E+05

 

 

 

WRITELN ([< имя файла или устройства >,]< список выражений >);

 

________________________________________________________

Var A,B,C,D,E:integer;

Begin

A:=1; B:=2; C:=3; D:=4; E:=5;

Writeln (‘ A=’,A,’ B=’,B);

Write(‘ C=’,C);

Writeln(‘ D=’,D,’ E=’,E);

End.

 

 

На экран:

_A=1_B=2

_C=3_D=4_E=5

 

________________________________________________________

 

...

For I:=1 to M do

Begin

For J:=1 to N do

Write(A[I,J]:5);

Writeln

End;

________________________________________________________

 

Uses Printer;

Var A:array[1..10,1..10]of real;

M,N:integer;

Begin

Readln(M,N);

For I:=1 to M do

For J:=1 to N do

Read(A[I,J]);

For I:=1 to M do

Begin

For J:=1 to N do

Write(Lst,A[I,J]:6:1);

Writeln(Lst)

End;

Readkey

End.

Пример

Дана строка символов. Разделителями слов в строке являются пробелы, запятые, точки с запятыми, двоеточия. Составить массив из слов-палиндромов.

 

PROGRAM PAL;

USES CRT;

VAR S: STRING;

U: STRING[30];

A: ARRAY[1..127] OF STRING[30];

I, L, D, NS, K: INTEGER;

F: BOOLEAN;

MN: SET OF CHAR;

BEGIN

CLRSCR;

MN:=[ ‘ ‘, ‘, ’, ‘; ’,’: ’];

WRITELN(‘ VVEDITE STROKU’);

READLN(S);

S:=S+’ ‘;

K:=0;

I:=1;

WHILE I<= LENGTH (S) DO

IF S[I] IN MN THEN

I:=I+1

ELSE BEGIN

NS:=I; D:=0;

WHILE NOT (S[I] IN MN) DO

BEGIN

D:=D+1; I:=I+1

END;

U:=COPY(S, NS, D);

F:=TRUE;

FOR L:=1 TO D DIV 2 DO

IF U[L]< > U[D +1 – L] THEN F:=FALSE;

IF F THEN BEGIN

K:=K+1;

A[K]:=U

END;

END;

FOR I:=1 TO K DO

WRITELN(A[I]);

READKEY

END.

 







Дата добавления: 2015-08-17; просмотров: 292. Нарушение авторских прав; Мы поможем в написании вашей работы!



Вычисление основной дактилоскопической формулы Вычислением основной дактоформулы обычно занимается следователь. Для этого все десять пальцев разбиваются на пять пар...

Расчетные и графические задания Равновесный объем - это объем, определяемый равенством спроса и предложения...

Кардиналистский и ординалистский подходы Кардиналистский (количественный подход) к анализу полезности основан на представлении о возможности измерения различных благ в условных единицах полезности...

Обзор компонентов Multisim Компоненты – это основа любой схемы, это все элементы, из которых она состоит. Multisim оперирует с двумя категориями...

Схема рефлекторной дуги условного слюноотделительного рефлекса При неоднократном сочетании действия предупреждающего сигнала и безусловного пищевого раздражителя формируются...

Уравнение волны. Уравнение плоской гармонической волны. Волновое уравнение. Уравнение сферической волны Уравнением упругой волны называют функцию , которая определяет смещение любой частицы среды с координатами относительно своего положения равновесия в произвольный момент времени t...

Медицинская документация родильного дома Учетные формы родильного дома № 111/у Индивидуальная карта беременной и родильницы № 113/у Обменная карта родильного дома...

Этические проблемы проведения экспериментов на человеке и животных В настоящее время четко определены новые подходы и требования к биомедицинским исследованиям...

Классификация потерь населения в очагах поражения в военное время Ядерное, химическое и бактериологическое (биологическое) оружие является оружием массового поражения...

Факторы, влияющие на степень электролитической диссоциации Степень диссоциации зависит от природы электролита и растворителя, концентрации раствора, температуры, присутствия одноименного иона и других факторов...

Studopedia.info - Студопедия - 2014-2024 год . (0.009 сек.) русская версия | украинская версия