Окно ввода — это стандартное
диалоговое окно, которое появляется на экране в результате вызова функции inputBox.
Значение функции inputBox — строка, которую ввел пользователь.
В общем виде инструкция
ввода данных с использованием функции inputBox выглядит так:
Переменная := InputBox(Заголовок,
Подсказка, Значение);
где:
Ниже в качестве примера
приведена инструкция, используя которую можно получить исходные данные для программы
пересчета веса из фунтов в килограммы. Окно ввода, соответствующее этой инструкции,
приведено на рис. 1.5.
s:=InputBox('Фунты-килограммы','Введите
вес в фунтах','0');
Рис. 1.5.
Пример окна ввода
Если во время работы
программы пользователь введет строку и щелкнет на кнопке ОК, то значением
функции inputBox будет введенная строка. Если будет сделан щелчок на кнопке
Cancel, то значением функции будет строка, переданная функции в качестве
параметра значение.
Следует еще раз обратить
внимание на то, что значение функции inputBox строкового (string) типа. Поэтому
если программе надо получить число, то введенная строка должна быть преобразована
в число при помощи соответствующей функции преобразования. Например, фрагмент
программы пересчета веса из фунтов в килограммы, обеспечивающий ввод исходных
данных из окна ввода, может выглядеть так:
s := InputBox('Фунты-килограммы1,'Введите вес в фунтах',''); funt := StrToFloat(s);
Релятивисты и позитивисты утверждают, что "мысленный эксперимент" весьма полезный интрумент для проверки теорий (также возникающих в нашем уме) на непротиворечивость. В этом они обманывают людей, так как любая проверка может осуществляться только независимым от объекта проверки источником. Сам заявитель гипотезы не может быть проверкой своего же заявления, так как причина самого этого заявления есть отсутствие видимых для заявителя противоречий в заявлении.
Это мы видим на примере СТО и ОТО, превратившихся в своеобразный вид религии, управляющей наукой и общественным мнением. Никакое количество фактов, противоречащих им, не может преодолеть формулу Эйнштейна: "Если факт не соответствует теории - измените факт" (В другом варианте " - Факт не соответствует теории? - Тем хуже для факта").
Максимально, на что может претендовать "мысленный эксперимент" - это только на внутреннюю непротиворечивость гипотезы в рамках собственной, часто отнюдь не истинной логики заявителя. Соответсвие практике это не проверяет. Настоящая проверка может состояться только в действительном физическом эксперименте.
Эксперимент на то и эксперимент, что он есть не изощрение мысли, а проверка мысли. Непротиворечивая внутри себя мысль не может сама себя проверить. Это доказано Куртом Гёделем.
Понятие "мысленный эксперимент" придумано специально спекулянтами - релятивистами для шулерской подмены реальной проверки мысли на практике (эксперимента) своим "честным словом". Подробнее читайте в FAQ по эфирной физике.