СРОЧНО!!СРОЧНОООООООООООО!!!ПОЖАЛУЙСТААА

Безотлагательно!!СРОЧНОООООООООООО!!!ПОЖАЛУЙСТААА

Задать свой вопрос
1 ответ
Var q: integer;
    s: real;
begin
  q:=0;
  repeat
    inc(q);
    s:=sqr(q)*q/125 - sqr(q) -90*q + 10000;
  until slt;0;
  writeln('объем выпуска: ',q);
  s:=(sqr(q)*q/125-sqr(q)+180*q+10000)/q;
  writeln('затраты на единицу: ',s:5:2);
end.

объем выпуска: 86
издержки на единицу: 269.45

Мария Михайликова
у меня оно не так указывает
Vladislav Avanesjanc
ну все одинаково спасибо огромное)
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт