Перевод числа из десятичной системы счисления в шестнадцатеричную.

Напишем программу, которая вводит с клавиатуры целое число в диапазоне от 0 до 15 и преобразует его к шестнадцатеричной системе счисления. Напомню, что в шестнадцатеричной системе счисления числа в диапазоне от 0 до 9 соответствуют таким же числам в ...

Функции LENGTH и CONCAT.

Функция Length возвращает в качестве значения длину строки. Например, если в строковой переменной «stroka» записано слово «Pascal», то Length(stroka) будет равно 6. Эта операция аналогична операции Ord(stroka[0]), которую мы разбирали в 1-м уроке. ...

Строки в Паскаль.

Тип данных String (строковый тип) используется в Паскаль для обработки текстов. Если в одну переменную типа Char можно записать лишь один символ, то в переменную типа String можно записать до 255 символов.

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

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

Формальным параметром функции может быть не только переменная скалярного типа, но и идентификатор переменной структурированного типа данных.

Вычисление предела последовательности.

Вычисление предела последовательности является типичной задачей на использование итерационного цикла.

Задача табулирования функции предполагает получение таблицы значений функции при изменении аргумента с фиксированным шагом. В качестве исходной информации должны быть заданы: Х0, Хn – начало и конец промежутка табулирования, при этом (Х0< Хn); n – число шагов разбиения промежутка [Х0, Xn]; F(X) – описание табулируемой функции.

При составлении алгоритма предполагается, что X – текущее значение аргумента; h – шаг изменения аргумента (иногда его называют шагом табуляции функции); i – текущий номер точки, в которой вычисляются функция (i = 0 .. n).
Количество интервалов n, шаг табуляции h и величины Х0, Хn связаны между собой фор-мулой:

tabulirovanie funkcii

Интерпретация переменных (т. е. их обозначение в математической постановке задачи, смысл и тип, обозначения в блок-схеме и программе) приведена в таблице имен.

tabulirovanie funkcii.

Пример 17. Табулировать функцию F(X) в N равноотстоящих точках, заданную на промежутке [Х0, Xn], где

tabulirovanie funkcii..PROGRAM PR17;
VAR
I, N: INTEGER;
X, Y: REAL;
H, X0, XN: REAL;
BEGIN
WRITELN('ВВЕДИТЕ X0, XN, N');
READLN(X0, XN, N);
H := (XN - X0)/N;
FOR I:=0 TO N
DO BEGIN
       Y:= SIN(X+1)*EXP(2-X*X);
       X := X0 + I * H;
       WRITELN (X:4:1,",Y:9:6)
       END
END.

tabulirovanie funkcii...

Теперь запишем решение этой же задачи, но с использованием цикла While...DO.

PROGRAM PR17_while;
VAR
N: INTEGER;
X, Y: REAL;
H, X0, XN: REAL;
BEGIN
WRITELN('ВВЕДИТЕ X0, XN, N');
READLN(X0, XN, N);
H := (XN - X0)/N;
X:=X0;
WHILE X<=XN
DO BEGIN
       Y:= SIN(X+1)*EXP(2-X*X);
       X := X + H;
       WRITELN (X:4:1,",Y:9:6)
       END
END.

tabulirovanie funkcii....


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


Комментарии  

 
-3 # ника 18.11.2012 13:37
8. Описати процедуру перевірки простоти числа. Описати процедуру перевірки числа на розкладеність в суму виду 1+2а. Скласти програму, яка вибирає з даного масиву чисел ті, які задовільняють двом вимогам.
 
 
-3 # Катя 18.12.2012 13:45
что такое i в первой программе?
 
 
-5 # Дмитрий 16.04.2014 16:51
первое значение цикла
 
 
-5 # Jes 24.12.2012 11:57
:eek: :-| :-? :o :cry:
 
   ГлавнаяПаскальЛекции по ПаскальТабулирование функций.