Меню Рубрики

Как в паскале написать бесконечность

Как в паскале написать бесконечность

надо задать функцию, которая при одних значениях переменной = 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.

«Красивый» вывод целых и вещественных чисел

Для того чтобы после вывода значений переменных оставались отступы, чтобы значения не «сливались» друг с другом, принято через двоеточие указывать какое количество символов нужно предусмотреть для вывода значения:

Арифметические операции в Паскале

17 div 5 3 целочисленное деление 17 mod 5 2 остаток от целочисленного деления

Порядок выполнения операций

  1. вычисление выражений в скобках;
  2. умножение, деление, div, mod слева направо;
  3. сложение и вычитание слева направо.

Стандартные арифметические процедуры и функции Pascal

Здесь стоит более подробно остановиться на некоторых арифметических операциях.

    Операция inc в Паскале, произносимая как инкремент, это стандартная процедура pascal, которая обозначает увеличение на единицу.

Пример операции inc:

Более сложное использование процедуры inc:
Inc(x,n) где x — порядкового типа, n — целого типа; процедура inc увеличивает x на n.

  • Аналогично работает процедура Dec в Паскале: Dec(x) — уменьшает x на 1 (декремент) или Dec(x,n) — уменьшает x на n.
  • Оператор abs представляет собой модуль числа. Работает следующим образом:

    Пример использования функции odd:

    begin WriteLn(Odd(5)); WriteLn(Odd(4)); end.

    Пример использования процедуры 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


  • 0 0 голоса
    Article Rating
    Подписаться
    Уведомить о
    guest

    0 Комментарий
    Старые
    Новые Популярные
    Межтекстовые Отзывы
    Посмотреть все комментарии