В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Sn9
Sn9
12.09.2020 16:30 •  Информатика

Решить : 1)даны x,y,z.найти f=max(x^2+y^2-z; x^2+z^2-y)+64 2)y=(20x-10x^3,при x< =10 (25x^3-61x^2,x> 10

Ответ:
matgim17
matgim17
04.10.2020 22:50
// PascalABC.NET 3.2, сборка 1363 от 17.12.2016
// Внимание! Если программа не работает, обновите версию!

begin
  var x,y,z:real;
  Read(x,y,z);
  var f:=max(x*x+y*y-z,x*x+z*z-y)+64;
  Writeln('f=',f)
end.

// PascalABC.NET 3.2, сборка 1363 от 17.12.2016
// Внимание! Если программа не работает, обновите версию!

begin
  var x:=ReadReal('x=');
  var y:=x>10?x*x*(25*x-61):10*x*(2-x*x);
  Writeln('y=',y)
end.
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?