ЗАДАНИЕ 1. Составите таблицу значений функции z = e-x на промежутке от хначСоставите таблицу значений функции z = e-x на промежутке от хнач. до хкон. с шагом х. Результаты оформите в виде таблицы. Значение x и z печатать в таблице с тремя знаками в дробной части.
Решение: 1. В данной задаче в качестве параметра цикла будет использоваться переменная х, значения которой будут меняться в заданных пределах. Исходные данные для расчета: хнач., хкон., х. Результаты: - значение функции z. Чтобы рассчитать ширину таблицы, условимся, что значения x и z в ней будут выдаваться по формату 10: 3. Тогда ширина таблицы с учетом вертикальных ограничителей (и двух пробелов: один перед числом, а другой после), будет равна 27 символов. Горизонтальные линии таблицы будем формировать с помощью цикла. 2. Составим графическую схему алгоритма.
Нет
Да
3. Составим таблицу соответствия переменных.
4. В соответствии с пунктом 2 и 3 составим программу.
Program tabl; {табуляция функции} var X, XN, XK, DX, Z: real; i: integer; begin writeln (‘Введите хнач., хкон., шаг ‘); readln (XN, XK, DX); {Вывод заголовка таблицы} writeln (lst, ‘ ‘: 10, функция z=EXP (-X)’); for i: =1 to 27 do write (lst, ‘ ‘); writeln (lst, ‘| X | Z |’); for i: =1 to 27 do write (lst, ‘ – ‘); writeln (lst); {Рабочая часть программы} X: =XN; Writeln X< =XK do Begin Z: =EXP(-X); Writeln (lst, ‘| ‘, X: 10: 3, ‘ | ‘, Z: 10: 3, ‘ | ‘); X: =X+DX End; {Вывод низа таблицы} for i: =1 to 27 do write (lst, ‘ – ‘); writeln (lst); end.
|