Лабораторная по информатике 3,1. Отчет Условие задачи Вычислить, упростив при помощи дополнительной переменной

• Название: Отчет Условие задачи Вычислить, упростив при помощи дополнительной переменной
• Дата: 25.12.2018
• Размер: 38.71 Kb.
• Имя файла: Лабораторная по информатике 3,1.docx
• Тип: Отчет; #61783

Л.Р.№1 «Линейные вычислительные процессы»	Студент
	Группа
	Дата
	Допуск
	Выполнение
Вариант 7	Отчет

Условие задачи

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



Тестовые примеры:

Пример 1 Входные данные: a=1, b=2, c=3, K=4 Выходные данные: Дробь равна -6.598501022 Экспонента в дробной степени равна 0.001362409 Корень от экспоненты 0.036910821 Значит вся формула получается T= -3.922189792 В отформатированном виде T=-3.922

Пример 2 Входные данные: a=2, b=3, c=1, K=2 Выходные данные: Дробь равна 7.698251192 Экспонента в дробной степени равна 2204.48939 Корень от экспоненты 46.95199027 Значит вся формула получается T=53.88041634 В отформатированном виде T=53.88

Конец

Вывод T

Вывод a, b, c

Вывод Z, X, Y













Начало

Ввод a

Ввод в

Ввод с

Ввод K

Блок-схема:

Листинг программы на Pascal

program exp;

var

a, b, c, K, X, Y, Z, T: real;

begin

cls;

// ввод данных

writeln('Введите a');

readln(a);

writeln('Введите b');

readln(b);

writeln('Введите c');

readln(c);

writeln('Введите K');

readln(K);

//вычисление промежуточных результатов

//сначала числитель дроби

X: =abs(a+b+c);

//знаменатель дроби

Y: =sin(a-c);

//значение дроби

Z: =X/Y;

//вычислим экспоненту в дробной степени

X: =exp(Z);

//корень от экспоненты в степени

Y: =sqrt(X);

//теперь всю формулу

T: =0.15*K*a*Z+Y;

writeln('Вы ввели:');

writeln('a=', a, 'b=',b, 'c=',c, 'K=', K);

writeln('Значение дроби равно', Z, ',');

writeln('Экспонента в дробной степени равна', X, ',');

writeln('Корень от экспоненты:', Y, ',');

writeln('Значит всё выражение', T);

writeln('В отформатированном виде T= ', T:8:3);

end.