1. Информатика
  2. Вычислите в паскаль. нужны программы,

Вычислите в паскаль. нужны программы, 1. y=x- x3/3+x5/5; 2. y=2 в степени(-x) - cosx +sin(2xy); 3.y=x-10sinx+ |x4-x5|; 4.y=x2-7x+10/x2-8x+12; x3; x5; x4- это степени

лерапуся лерапуся    3   05.10.2019 14:50    6

Ответы
blagodarovamari blagodarovamari  09.10.2020 21:51

var

x,y: integer;

begin

readln(x,y);

writeln('1. ',x-x**3 / 3 + x**5 / 5);

writeln('2. ',2**(-x) - cos(x) + sin(2*x*y));

writeln('3. ',x-(10*sin(x)) + abs((x**4)-(x**5)));

writeln('4. ',x**2-7*x+10/x**2-8*x+12);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
katerina2398 katerina2398  04.03.2021 05:27
напишите объяснение, какая ошибка допущена в программе нахождения периметра треугольника. ​...
камилла731 камилла731  04.03.2021 05:26
Учні 7-А класу спілкувалися у соцмережі. Петрик зробив х дописів, Марічка - у дописів, а кожен з решти учнів - по z дописів. Скільки всього було зроблено дописів, якщо у спілкуванні...
reded5610 reded5610  04.03.2021 05:25
Определите результат выполненной программы.ХЭЛП​...
Inna14888 Inna14888  04.03.2021 05:21
Цикл с предусловием. Урок 2 Дан фрагмент кода программы. x = 7 y = 2 while(x!=5): x=x-1 y=y+x Определи значение переменной y после его выполнения....
anyta03 anyta03  22.04.2020 21:30
Нужна в информатике(паскаль) var a,b,c:integer; begin a:=−36; b:=abs(a); writeln( abs(−36)= ,b); c:=sqr(b); writeln( sqr(b)= ,c); c:=sqr(b+b); writeln( sqr(b+b)= ,c); end....
lurudzheva lurudzheva  22.04.2020 21:30
Определите назначение программы на Паскале...
vtrnnst vtrnnst  18.04.2019 20:47
Нужно выполнить на pascal e написать функции q(x)=sin(x)+2cos(x)+1 и p(t,x)=t/x. напишите программу, которая получает введенное число с клавиатуры, подставляет значения в функцию...
mskobetsnata mskobetsnata  16.02.2021 13:21
На питоне если хотя бы 1 решите будет очень очень круто, если можете еще решить буду благодарен. Если вам нужны то за 1 прогу дам 100 ( любую) очень Число 609 записали в системах...
Снежана21111 Снежана21111  16.02.2021 13:22
Переведите с Pascal на С begin write( Введите символ: ); readln(c); case c of 0 .. 9 :writeln( digit ); A .. Z , a .. z :writeln( lat ); А .. Я , а .. я :writeln( rus ); else writeln(...
ksusha290 ksusha290  16.02.2021 13:22
Дано два числа. Обчисліть відношення меншого числа до більшого .Повідомити якщо числа рівні ів будьласка треба програма​...

Популярные вопросы