Div, Mod, сложение, вычитание в Pascal.

Помимо операций умножения и сложения, над целочисленными переменными производятся операции Div (операция целочисленного деления), Mod (вычисление остатка от целочисленного деления), операция вычитания «-».

Ввод логических переменных с клавиатуры.

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

Использование Var, Integer, Readln.

Процедура Readln используется не только для задержки экрана. Ее основная задача - ввод данных с клавиатуры. В этой статье мы научимся вводить числа с клавиатуры, и потом выводить их на экран. Для этого нам будет необходимо познакомиться с разделом ...

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

Инициализация одномерного массива.

Отличительной особенностью Паскаля от большинства процедурных языков является то, что все переменные должны быть инициализированы. То есть в разделе VAR переменным отводится место, а начальное ...

Вложенный арифметический цикл.

Под вложенным арифметическим циклом понимают такую алгоритмическую структуру, при которой в тело одного цикла с параметром включен другой цикл со своим параметром.

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

Вычислить

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.
Следующая статья: Вычисление предела последовательности.


   ГлавнаяПаскальЛекции по ПаскальТабулирование функций.