Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
1
Program Lab1_variant007; Var x,y: real; Begin writeln; writeln('программа вводит значение аргумента X и вычисляет значение функции Y'); writeln(' |1+x x>14.5'); writeln('Y= |exp^(-x) 3<=x<=14.5'); writeln(' |cos(x) x<3'); writeln; write(' введите x= '); readln(x); if x>14.5 then Y:=1+x else if x>=3 then Y:=exp(-x) else Y:=cos(x); writeln('Y=',Y:7:3); readln; end.
run
|
edit
|
history
|
help
0
Matrix
aaa
Бассейн-8
practica 1 ejercicio 5
Vremenska prognoza
zadanye 3 a
test14
janja - naloga 2 - 25.1.2012
mine
testMatrice0.1