Задание 2. Линейные алгоритмы

 

Задание

Написать программу реализации линейного алгоритма приема исходных данных со стандартного внешнего устройства (клавиатуры), преобразования данных в результат по заданной в соответствии с вариантом формуле и вывода исходных данных и результата на стандартное устройство вывода (дисплей). Исходные данные и результат должны быть представлены в форматированном виде.

Выполнение

Дана формула для выполнения задания:

 

 

Для удобства программирования некоторые части функции представим в виде функций:

 

,

 

Программа для указанного варианта имеет следующий вид:

 

program Task2;

uses

Crt; {Подключение графического модуля}

Var

x:real; {переменные для ввода данных}

m,k,z:real;

begin

ClrScr;

Write('Введите исходные данные (x): ');

ReadLn(x);

m:=4.187+Pi*Pi+sin(x*Pi/7);

k:=tan(3*Pi/4+x*Pi);

z:=m/k;

WriteLn('Исходные данные:');{Вывод на экран исходных данных}

WriteLn('x=',x:3:2);

WriteLn;

Write('Результат: ');{Вывод на экран результат}

WriteLn(' z=',z:3:2);

Readln;

end.

 

Рис. 1. Примерный вид исходных данных и результатов на экране