Дано уравнение sin x2 + cos x2-8x = 0 методом деления отрезка пополам. Известно, что значение корня находится на отрезке [0; 1].
Решите уравнение двумя Напишите программу в Pascal.
2. Решите уравнение в Excel.
1. Решение уравнений в Excel используя инструмент Подбор параметра
2. Численное решение уравнений. Метод деления отрезка пополам
223
441
Ответы на вопрос:
1. так напишу:
program s_parallelogramm;
var
a,h,s: real;
begin
write('Основание = '); readln(a);
write('Высота = '); read(h);
if ((a=0) or (a<0)) or ((h=0) or (h<0)) then writeln('Ошибка! Значения основания и высоты должно быть натуральными числами')
else
begin
s:=a*h;
writeln('Площадь (S) параллелограмма = ', s);
end;
end.
2) //PascalABC.Net
//NaaMan
var
a,b : real;
begin
write('Введите А и В: ');
readln(a,b);
if (a=0) then
writeln('Корень отсутствует')
else
writeln('Корень ', -b / a)
end.
Популярно: Информатика
-
lubovsalamatova22.04.2021 22:49
-
innalemesh117.01.2023 11:19
-
Englismen12.02.2020 07:45
-
LG161231.01.2021 00:14
-
Ladylia23.02.2022 11:30
-
НатаЛини17.09.2020 09:51
-
SlavaRPSS07.04.2023 18:36
-
санёкмаслов01.08.2020 22:34
-
22031982golub04.05.2023 07:22
-
severina320.11.2022 09:30