48

Это Паскальтут дается функция 5*e^

aleksei1977 15 февраля 2023

Это Паскальтут дается функция 5*e^ (-x^2/2) uses Crt; var a=-5,b=5,h=0,5: real; x,y: real; function F (x: real): real; beginF (x): =5*e^ (-x^2/2) end; beginclrscrwriteln ('*y=5*e^ (-x^2/2)*'); repeatwrite ('-5='); readln (a); write ('5='); readln (b); write ('0,5='); until (a

категория: информатика

57

Если что, проверялось только в pascal abc.uses crt; var x,a,b,h: real; beginwriteln ('Input a,b,h: '); read (a,b,h); writeln ('x',','f (x) '); x: =a; while x <= b dobeginwriteln (x,', (5*power (e, (-x*-x) /2): 0:2); x: =x+h; end; end.

пользователи выбрали этот ответ лучшим

Знаете другой ответ?
Другие вопросы по информатике

ПОПУЛЯРНОЕ
Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...