Как в паскале написать бесконечность
надо задать функцию, которая при одних значениях переменной = 0, а при других — +бесконечности.
где эту бесконечность взять? помогите , пожалста, написать программулину по вычислению этой самой бесконечности(я так поняла — это самое большое число в разрядной сетке Pascal).
Как его найти?
function RealInfinity(v:real):real; begin if v=0 then RealInfinity:=0 else if v>0 then RealInfinity:=1.7e38 else RealInfinity:=2.9e-39; end; |
function DoubleInfinity(v:Double):Double;
begin
if v=0 then DoubleInfinity:=0 else
if v>0 then DoubleInfinity:=1.7e308 else
DoubleInfinity:=5.0e-324;
end;
function SingleInfinity(v:Single):Single;
begin
if v=0 then SingleInfinity:=0 else
if v>0 then SingleInfinity:=3.4e38 else
SingleInfinity:=1.5e-45;
end;
function ExtendedInfinity(v:Extended):Extended;
begin
if v=0 then ExtendedInfinity:=0 else
if v>0 then ExtendedInfinity:=1.1e4932 else
ExtendedInfinity:=3.4e-4932;
end;
function CompInfinity(v:Comp):Comp;
begin
if v=0 then CompInfinity:=0 else
if v>0 then CompInfinity:=9.2e18 else
CompInfinity:=-9.2e18;
end;
function ByteInfinity(v:Byte):Byte;
begin
if v=0 then ByteInfinity:=0 else
if v>0 then ByteInfinity:=High(v) else ByteInfinity:=Low(v);
end;
function ShortIntInfinity(v:ShortInt):ShortInt;
begin
if v=0 then ShortIntInfinity:=0 else
if v>0 then ShortIntInfinity:=High(v) else ShortIntInfinity:=Low(v);
end;
function WordInfinity(v:Word):Word;
begin
if v=0 then WordInfinity:=0 else
if v>0 then WordInfinity:=High(v) else WordInfinity:=Low(v);
end;
function IntegerInfinity(v:Integer):Integer;
begin
if v=0 then IntegerInfinity:=0 else
if v>0 then IntegerInfinity:=High(v) else IntegerInfinity:=Low(v);
end;
Источник статьи: http://forum.sources.ru/index.php?showtopic=41242
Pascal: Занятие №1. Часть 3: Типы данных в Паскаль
Типы данных в Паскале
Паскаль — это типизированный язык программирования. Это означает, что переменные, в которых хранятся данные, имеют определенный тип данных. Т.е. программе напрямую надо указать, какие данные могут храниться в той или иной переменной: текстовые данные, числовые данные, если числовые — то целочисленные или дробные, и т.п. Это необходимо в первую очередь для того чтобы компьютер «знал», какие операции можно выполнять с этими переменными и как правильно их выполнять.
Например, сложение текстовых данных, или как это правильно называется в программировании — конкатенация — это обычное слияние строк, тогда как сложение числовых данных происходит поразрядно, кроме того, дробные и целые числа складываются тоже по-разному. То же самое касается и других операций.
Рассмотрим наиболее распространенные в Pascal типы данных.
Целочисленные типы данных в Паскаль
Тип | Диапазон | Требуемая память (байт) |
byte | 0..255 | 1 |
shortint | -128..127 | 1 |
integer | -32768.. 32767 | 2 |
word | 0..65535 | 2 |
longint | -2147483648..2147483647 | 4 |
Нужно иметь в виду, что при написании программ в паскале integer (в переводе с англ. целое) является наиболее часто используемым, так как диапазон значений наиболее востребуем. Если необходим более широкий диапазон, используется longint (long integer, в переводе с англ. длинное целое). Тип byte в Паскале используется, когда нет необходимости работать с отрицательными значениями, то же самое касается и типа word (только диапазон значений здесь значительно больше).
Примеры того, как описываются (объявляются) переменные в Паскале:
program a1; var x,y:integer; <целочисленный тип>myname:string; <строковый тип>begin x:=1; y:=x+16; myname:=’Петр’; writeln (‘имя: ‘,myname, ‘, возраст: ‘, y) end.
Результат:
имя: Петр, возраст: 17
Комментарии в Паскале
Обратите внимание на то, как используются комментарии в Паскале. В примере комментарии, т.е. служебный текст, который «не видим» для компилятора, заключаются в фигурные скобки. Обычно комментарии делаются программистами с целью пояснения фрагментов кода.
Вещественные типы данных в Паскаль
Вещественные числа в Паскале и вообще в программировании — это название дробных чисел.
Тип | Диапазон | Требуемая память (байт) |
real | 2.9 * 10E-39 .. 1.7 * 10E38 | 6 |
single | 1.5 * 10 E-45 .. 3.4 * 10E38 | 4 |
double | 5 * 10E-324 .. 1.7 * 10E308 | 8 |
extended | 1.9 * 10E-4951 .. 1.1 * 10E4932 | 10 |
Тип real в Паскале — наиболее часто используемый из вещественных типов.
Выше были представлены простые типы данных в Паскаль, к которым относятся:
- Порядковые
- Целые
- Логические
- Символьные
- Перечисляемые
- Интервальные
- Вещественные
Для вывода значений переменных вещественного типа обычно используется форматированный вывод:
Наряду с простыми типами в языке еще используются структурированные типы данных и указатели, которым будут посвящены последующие уроки по Паскалю.
Константы в Паскале
Зачастую в программе заранее известно, что переменная будет принимать какое-то конкретное значение и не менять его на протяжении выполнения всей программы. В таком случае необходимо использовать константу.
Объявление константы в Паскале происходит до объявления переменных (до служебного слова var ) и выглядит следующим образом:
Пример описания константы в Паскале:
const x=17; var myname:string; begin myname:=’Петр’; writeln (‘имя: ‘,myname, ‘, возраст: ‘, х) end.
«Красивый» вывод целых и вещественных чисел
Для того чтобы после вывода значений переменных оставались отступы, чтобы значения не «сливались» друг с другом, принято через двоеточие указывать какое количество символов нужно предусмотреть для вывода значения:
Арифметические операции в Паскале
Порядок выполнения операций
- вычисление выражений в скобках;
- умножение, деление, div, mod слева направо;
- сложение и вычитание слева направо.
Стандартные арифметические процедуры и функции Pascal
Здесь стоит более подробно остановиться на некоторых арифметических операциях.
- Операция inc в Паскале, произносимая как инкремент, это стандартная процедура pascal, которая обозначает увеличение на единицу.
Пример операции inc:
Более сложное использование процедуры inc:
Inc(x,n) где x — порядкового типа, n — целого типа; процедура inc увеличивает x на n.
Пример использования функции odd:
begin WriteLn(Odd(5));
Пример использования процедуры sqr в Pascal:
var x:integer; begin x:=3; writeln(sqr(x)); <ответ 9>end.
Формула такая: exp(ln(a)*n) , где а — число, n — степень (а>0).
Однако в компиляторе pascal abc возведение в степень осуществляется значительно проще:
Пример использования процедуры sqrt в Pascal:
var x:integer; begin x:=9; writeln(sqrt(x)); <ответ 3>end.
Источник статьи: http://labs-org.ru/pascal-1_3/
Ввод бесконечного числа данных в Паскале
Как организовать ввод числа в паскале с заданным количеством символов?
Как организовать ввод числа в паскале с заданным количеством символов? например,дано а=1,001, но.
Как сохранять в базу данных числа, у которых бесконечный остаток так, чтобы не было видно бесконечного остатка?
Я уже несколько раз поднимал этот вопрос на форуме, но тогда он косался вывода в Label. Теперь мне.
Ввод очень длинного числа в входных данных
Ребят, помогите пожалуйста. Смысл задачи состоит в следующем: В 1 строке входного файла содержится.
Ввод в паскале
1) как читать стрелочки? с помощью readkey могу читать буквы и цифры, а со стрелочками как? .
Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.
Ввод слов в паскале
Ввести четыре слова на русском языке. Вывести на экран все глухие согласные буквы, которые входят в.
Графика на паскале ввод с клавиатури и движужйшеся кружок
Можете пожалуйста помочь я не могу не как зделать так чтоб по игрику не закривалось а оно почемуто.
Чтобы ввод первого числа был в одной форме, ввод второго — в другой
Private Sub Command1_Click() Text1.Text = «» ‘î÷èùåíèå îêîí Text2.Text = «» Text3.Text = «0».
Ввод целого положительного числа. Если вводится отрицательное число — повторить ввод
Организовать ввод целого положительного числа. Если вводится отрицательное число — заставить.
Запуск бесконечного числа потоков
Помогите чайнику serzh82saratov, не нужно задавать свои вопросы в чужих темах, особенно если эти.
Выбора из бесконечного числа сундуков
Друзья, подскажите как быть. Есть задача: Разве можно тут однозначно утверждать что выбрав.
Источник статьи: http://www.cyberforum.ru/turbo-pascal/thread618061.html
Как сделать так что бы программа в Паскале складывала числа, например от 1 до 10 (1 и 10 включительно)
Можно сложить с помощью цикла:
А можно с помощью формулы суммы первых n-членов арифметической прогрессии:
О, я ваши видео по подготовке к ЕГЭ смотрю)
Как можно использовать треугольник Паскаля? Зачем он вообще нужен?
Треугольник Паскаля — это очень удобная таблица биномиальных коэффициентов, она строится по очень простому и легко запоминающемуся правилу (вы, наверное, его знаете), поэтому треугольник можно быстро восстановить до интересующей вас строчки. А теперь о том, где можно использовать.
1) Компоненты n-й строчки треугольника Паскаля — это коэффициенты при степенях чисел a и b в выражении (a+b)^n = a^n + na^(n-1)b + (цэ из n по 2)a^(n-2)b^2+.
2) Легко восстановить эти самые (цэ из n по m), так как m-е число в n-й строке (если считать с 0) — это искомое число. То есть не нужно считать все эти факториалы.
Если бы вы могли добавить (1) ноль к любому числу в вашей жизни, какое бы это было число и почему?
Хочешь жить — умей вертеться! И высший пилотаж — это нае. Пардон. Обмануть систему.
Я бы добавил нолик вначале числа. «Ноль-целых-запятая и сколько-то там» истинно несчастных людей. У кого-то беда-печаль — это выходит новый айфон, а денег на покупку не хватает, а у кого-то нет даже стакана чистой воды.
Вот я про по-настоящему нечастных людей. У кого-то ребенок сильно болеет и мы, сограждане, всем миром собираем на лечение. Кто-то каждое утро просыпается и удумает о том, где найти еду. Ну много вариантов. Думаю, мысль понятна. Вот всех таких собрать, выразить в процентном соотношении к общему числу человеков на планете и призвиздячить нолик спереди. Вот)))).
Не знаю, как кому, а мне-бы хотелось жить где меньше войн, голода, неизлечимо больных людей и т.д.
Такие дела). Всем мира и доброты))).
Как сделать, чтобы значение в одной ячейке зависело от значения в другой ячейке?
Если речь об EXCEL, то вариантов множество, в зависимости от конкретной задачи.
В такой формулировке можно воспользоваться, например, следующей формулой:
«базовое» значение у нас в данном случае будет в ячейке A1, формула в ячейке B1:
Почему программисты пишут программы на C++ и подобных сложных языках, если на Python синтаксис проще, и можно написать программу быстрее?
Вопрос содержит несколько неявных предположений, с ними нужно быть осторожней.
Во-первых, смотря что называть «продолжают писать». Если верить TIOBE index, самому известному индексу популярности языков программирования, за последние 20 лет популярность С++ снизилась почти втрое, а популярность Питона возросла раз в семь. Python обогнал С++ примерно полтора года назад.
Во-вторых, «подобных сложных языков», пожалуй, больше и нет. Из распространенных языков программирования С++ самый монструозный и «навороченный», с кучей парадигм, синтаксических конструкций и тонкостей, позволяющих сотней способов «выстрелить себе в ногу».
В-третьих, на Python можно написать быстрее далеко не любую программу. Если говорить упрощённо, на Python можно быстрее писать многие программы за счёт того, что некоторые писать почти невозможно. Прежде всего, работающие с железом на низком уровне и такие, которые должны выжимать из производительности всё возможное (операционные системы, драйверы, игровые движки).
Ещё одна очень распространенная проблема — это interop и связанная с ним инерция. Программа на Питоне может быть проще, но если ей нужно будет постоянно общаться с уже имеющимися в системе программами, написанными годы назад, например, на С++, то необходимая для этого общения прослойка, как правило, «сжирает» всю простоту, а программисту оказывается нужно хорошо знать не более простой язык, а сразу оба.
Источник статьи: http://yandex.ru/q/question/computers/kak_sdelat_tak_chto_by_programma_v_de1e0abf/?answer_id=44ec4493-acbd-41c3-8956-9b87a3a0a17a