Народ срочно помогите плиз, надо на паскале написать 4 проги:
Составить программу:
для определения среднего арифметического и среднего геометрического трёх действительных чисел
Составить программу для вычисления:
Код:
program 1
uses vincrt;
var x,y,a,s,z: real;
begin
write ('x='), readln (x);
write ('y='), readln (y);
a:=cos(1+cos(x-y)/(x/y)+sqr(y))
s:=cos(sin(ln(abs(x/y))))
if x*y < 1/2 then z:=a*a*a
else if x*y >= 1/2 then z:=s*s*s
write ('z:=')
end
составить программу, которая определяет принадлежит ли точка с координатами (x,y) заштрихованной области.
Координаты точки ввести с клавиатуры:
тут скорее не знаю формулу для вычисления программы - саму прогу допёр как написать примерно.
Составить программу для вычисления таблицы значений функции f(x) для x принадлежащего к [a,b]
с заданным шагом изменения x:
Это вообще незнаю как сделать, помогите плиз.
Чем быстрее тем лучьше, Заранее благодарен за помощь.