Программирование линейных алгоритмов
Автор: ov_rising • Январь 22, 2023 • Контрольная работа • 281 Слов (2 Страниц) • 217 Просмотры
Самостоятельная работа 1
Программирование линейных алгоритмов
Вариант 2
Задание 1
Программа:
Program lab1_1;
uses crt;
var x,y:real;
begin
read(x);
y:=Tan(4-3*x)/sqrt(abs(x));
writeln('x=',x);
writeln('y=',y);
readln;
end.
Результат:
х=-8.125
y= 0.0354357894274899
Блок-схема:
[pic 1]
Начало
Конец
Задание 2
Программа:
Program lab1_2;
uses crt;
Const C1=2e-6;
C2=1.6e-6;
C3=1.25e-4;
Var C,y:real;
begin
y:=1/C1+1/C2+1/C3;
C:=1/y;
writeln('C=',C);
readln;
end.
Результат:
C=8.8261253309797E-07
Блок-схема:
[pic 2][pic 3]
Начало
Конец
Задание 3
Программа:
Program lab1_3;
uses crt;
Var x,y,z,Q,N:real;
begin
readln(x);
readln(y);
readln(z);
Q:=abs(exp(y*log(x))-sqrt(y/x));
N:=(y-x)*(y-z/(y-x))/(1+sqr(y-x));
writeln('x=',x);
writeln('y=',y);
writeln('z=',z);
writeln('Q=',Q);
writeln('N=',N);
readln;
end.
Результат:
Начало
x=1.825
y=18.225[pic 4][pic 5]
...