Abs, Sqr в Pascal.

Abs - функция языка Паскаль, которая вычисляет модуль числа.
Sqr - функция языка Паcкаль, которая возводит число в квадрат.

Строковые константы в Pascal.

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

Логические операции с целыми числами.

Логические операции применимы не только к логическому типу данных, но и к целочисленному типу данных. Для целых чисел операции выполняются поразрядно, отдельно с каждым битом.

Циклы и массивы

Арифметический цикл с рекуррентной зависимостью.

Многие циклические вычислительные процессы используют рекуррентные зависимости при решении различных математических задач.

Итерационные циклы.

Если число повторений заранее не известно и решение о завершении цикла принимается на основе анализа некоторого условия, то такой повторяющийся вычислительный процесс называется итерационным циклом.

...

Примеры использования различных операторов цикла. Вложенный цикл.

Вычислить

Vlozhennihyj arifmeticheskiyj cikl.... Вычисления остановить при выполнении условия

Vlozhennihyj arifmeticheskiyj cikl.....Для решения этой задачи удобно использовать оператор цикла с предусловием WHILE ...DO.

PROGRAM PR22;
VAR       
У, Е: REAL;
I: INTEGER;
BEGIN
WRITELN('ВВЕДИТЕ E');
READLN(E);
I:= 1; Y:=0.5;
WHILE I * EXP(-I * LN(2)) > E
DO BEGIN
       Y:=Y + I*EXP(-I*LN(2));
       I:= I+ 1;
       END;
WRITELN('Y =', Y:12:8)
END.

Vlozhennihyj arifmeticheskiyj cikl......

Пример №23. Вычислить с точностью ? квадратный корень из величины 

Vlozhennihyj arifmeticheskiyj cikl2

Вычисление проводить по рекуррентной формуле:

Vlozhennihyj arifmeticheskiyj cikl2.

выбрав в качестве начального приближения величину

Vlozhennihyj arifmeticheskiyj cikl2.. При решении подобных задач условие остановки вычислительного процесса формулируется следующим образом: | Yi — Yi-1 |<?.

Vlozhennihyj arifmeticheskiyj cikl2...

Вводим с клавиатуры величины X и Е. Далее вычисляем первое приближение Y. Если X<1, то Y принимается равным X, в противном случае за Y принимается величина Х/2. Далее на основании Y нужно найти следующее приближение. Поэтому вычисленное значение записывается в ячейку с именем Y1 и с этого момента времени считается предыдущим значением. Текущее значение Y рассчитывается по рекуррентной формуле на основании Y1 и X. Этот циклический процесс повторяется до тех пор, пока не выполнится условие | Y — Y1 | < Е. После чего Y считается равным значению корня из X с точностью Е и выводится на экран монитора.

Vlozhennihyj arifmeticheskiyj cikl2....

PROGRAM PR23;
VAR       
X, Y, YI, E: REAL;
BEGIN
WRITELN('BBEДИTE X, E');
READLN(X, E);
Y:= X;
IF X>= 1 THEN Y:= Y/2;
REPEAT
Y1:=Y;
Y:= (Y1 +X/Y1)/2
UNTIL ABS(Y-Y1)<E;
WRITELN(Y =', Y:12:8)
END.


Чтобы проверить доступность компьютера по сети, необходимо выполнить пинг, чтобы узнать время отклика компьютера по сети при его доступности. Чем меньше время ожидания, тем лучше скокрость интернет соедниения.

Предыдущая статья: Вложенный арифметический цикл.
Оглавление: Лекции по Pascal.
Следующая статья: Вычисление предела последовательности.


   ГлавнаяПаскальЛекции по ПаскальВложенный арифметический цикл. Часть 2.