|
|
|
Инструкция write предназначена
для вывода на экран монитора сообщений и значений переменных. После слова write
в скобках задается список переменных, значения которых должны быть выведены.
Кроме имен переменных в список можно включить сообщение — текст, заключенный
в одиночные кавычки.
Например:
write(Summa);
write('Результат
вычислений');
write('Корни
уравнения. xl=', xl, ' х2=', х2);
После имени переменной
через двоеточие можно поместить описание (формат) поля вывода значения переменной.
Для переменной типа
Integer формат — это целое число, которое задает ширину поля вывода (количество
позиций на экране).
Например, инструкция
write(d:5);
показывает, что для
вывода значения переменной d используется 5 позиций.
Если значение переменной
такое, что его изображение занимает меньше позиций, чем указано в формате, то
перед первой цифрой числа будут выведены пробелы так, чтобы общее количество
выведенных символов было равно указанному в формате.
Например, если значение
переменной Koi типа integer равно 15, то в результате выполнения инструкции
write('Всего
изделий:', Kol:5);
на экран будет выведено:
Всего изделий: 15
Для переменных типа
Real формат представляет собой два целых числа, разделенных двоеточием. Первое
число определяет ширину поля вывода, второе — количество цифр дробной части
числа. Если задать только ширину поля, то на экране появится число, представленное
в формате с плавающей точкой.
Например, пусть переменные
x1 и х2 типа real имеют значения 13.25 и -0.3401, тогда в результате выполнения
инструкции
write('xl=',x1:5:2,'
х2=',х2:12)
на экран будет выведено:
x1=13.25
х2=-3.40100Е-01
Если ширины поля, указанной
в формате, недостаточно для вывода значения переменной, то выводится число в
формате с плавающей точкой и десятью цифрами после запятой (все поле вывода
в этом случае занимает 17 позиций).
После выполнения инструкции
write курсор остается в той позиции экрана, в которую он переместился после
вывода последнего символа, выведенного этой инструкцией. Следующая инструкция
write начинает вывод именно с этой позиции. Например, в результате выполнения
инструкций
х:=-2.73;
write('Значение
перем');
write('енной:');
write('х=');
write(x:8:5);
на экран будет выведено:
Значение
переменной: х=-2.73000
Инструкция writein
отличается от инструкции write только тем, что после вывода сообщения или значений
переменных курсор переводится в начало следующей строки. Например, если значением
переменной x1 является число -3.561, а значением переменной х2 — число 10.345,
то результатом выполнения инструкций
writein('Значения корней уравнения:');
writeln('x1=',x:7:3);
writein('х2=',х:7:3);
на экран будет выведено:
Значения корней уравнения:
xl=-3.5610
х2= 10.345
|
|
|
Релятивисты и позитивисты утверждают, что "мысленный эксперимент" весьма полезный интрумент для проверки теорий (также возникающих в нашем уме) на непротиворечивость. В этом они обманывают людей, так как любая проверка может осуществляться только независимым от объекта проверки источником. Сам заявитель гипотезы не может быть проверкой своего же заявления, так как причина самого этого заявления есть отсутствие видимых для заявителя противоречий в заявлении.
Это мы видим на примере СТО и ОТО, превратившихся в своеобразный вид религии, управляющей наукой и общественным мнением. Никакое количество фактов, противоречащих им, не может преодолеть формулу Эйнштейна: "Если факт не соответствует теории - измените факт" (В другом варианте " - Факт не соответствует теории? - Тем хуже для факта").
Максимально, на что может претендовать "мысленный эксперимент" - это только на внутреннюю непротиворечивость гипотезы в рамках собственной, часто отнюдь не истинной логики заявителя. Соответсвие практике это не проверяет. Настоящая проверка может состояться только в действительном физическом эксперименте.
Эксперимент на то и эксперимент, что он есть не изощрение мысли, а проверка мысли. Непротиворечивая внутри себя мысль не может сама себя проверить. Это доказано Куртом Гёделем.
Понятие "мысленный эксперимент" придумано специально спекулянтами - релятивистами для шулерской подмены реальной проверки мысли на практике (эксперимента) своим "честным словом". Подробнее читайте в FAQ по эфирной физике.
|
|
 |
