На распродаже на ценнике пальто указана старая цена товара 9000 рублей, и новая - 6300 рублей. - №28652767

На распродаже на ценнике пальто указана старая цена товара 9000 рублей, и новая - 6300 рублей. Сколько процентов от первоначальной стоимости товара составляла скидка?
- Предмет:
  Математика
- Автор:
  eifel
- 5 лет назад

Ответы 0

Добавить свой ответ

Еще вопросы

Охарактеризуйте химические свойства хлора. Почему хлор хранят в стальных банках?
- Предмет:
  Химия
- Автор:
  bowen
- 5 лет назад
- Ответов:
  
  1
- Смотреть
Допоможіть срочно треба по темі похідна функції та її застосування варіант 2
- Предмет:
  Алгебра
- Автор:
  dirtlujp
- 5 лет назад
- Ответов:
  
  1
- Смотреть
Поставьте глаголы в скобках в страдательный залог настоящего или прошедшего времени. Переведите предложения на русский язык.
1. Im Sommer _ oft Eis _ (essen).
2. In Berlin _ viel _ (bauen).
3. Die Miete _ jeden Monat _ (zahlen).
4. Die Wőrter _ von der Studenten _ (wiederholen).
5. Du _ auf dem Bahnhof _ (erwarten).
6. Berlin _ 1237 _ (grűnden).
7. Das Radio _ von dem russischen Gelehrten A.S. Popow _ (erfinden).
7. Im 2. Weltkrieg _ die Straβen Berlins stark _(zerstőren).
8. Das Geld _ ihm von mir rechtzeitung_ (zurűckgeben).
9. Das Rezept _ von dem Arzt _ (schreiben).
- Предмет:
  Немецкий язык
- Автор:
  agustínhernandez
- 5 лет назад
- Ответов:
  
  1
- Смотреть
Перевод кода из Pascal в C# (Консольное приложение)
Задача: написать программу, которая позволяет вычислять определенный интеграл с помощью формулы Ньютона-Котеса.

код:
{
Программа для вычисления интеграла
численным методом Ньютона-Котеса открытого типа 4-го порядка
с заданной погрешностью вычислений
}
program NewtonCotes;

{подинтегральная функция}
function F(x: real): real;
begin
F := sin(x);
end;

{вычисление интеграла на отрезке [a, b] методом Ньютона-Котеса открытого типа 4-го порядка}
function NewtonCotesOpen4(a, b: real): real;
const
n = 4; {порядок метода}
c: array [1..n - 1] of real = (2, -1, 2); {весовые коэффициенты}
K = 3.0; {делитель}
var
Res: real;
h: real; {величина шага}
x: real;
i: integer;
begin
h := (b - a) / n;
Res := 0;
for i := 1 to n - 1 do
begin
x := a + i * h;
Res := Res + c[i] * F(x);
end;
NewtonCotesOpen4 := Res * (b - a) / K;
end;

{вычисление интеграла на отрезке [a, b] как суммы интегралов на n подинтервалах}
function SumSubIntervals(a, b: real; n: integer): real;
var
h: real;
i: integer;
begin
SumSubIntervals := 0;
h := (b - a) / n;
for i := 1 to n do
SumSubIntervals := SumSubIntervals + NewtonCotesOpen4(a + pred(i) * h, a + i * h);
end;

var
a, b, {границы интегрирования}
Eps: real; {погрешность численного интегрирования}
n: integer; {количество подинтервалов интегрирования}
Icur, {значение интеграла на текущем шаге итерации}
Ipre: real; {значение интеграла на предыдущем шаге итерации}

begin
a := 0;
b := Pi;
Eps := 0.00001;

n := 1;
Icur := SumSubIntervals(a, b, n);
repeat
Ipre := Icur;
n := 2 * n; {увеличиваем количество подинтервалов}
Icur := SumSubIntervals(a, b, n);
WriteLn('I=', Icur: 10: 8, ' при n=', n, ', e=', Abs(Icur - Ipre): 10: 8);
until Abs(Icur - Ipre) < Eps;
writeln('------------------------------------------------------');
WriteLn('I=', Icur: 10: 8, ' при n=', n, ', e=', Abs(Icur - Ipre): 10: 8);
end.
- Предмет:
  Информатика
- Автор:
  mombodkirp
- 5 лет назад
- Ответов:
  
  5
- Смотреть

How much to ban the user?

1 hour 1 day 100 years