Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
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
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 оценок)
Популярные вопросы: Информатика
margusqw
26.01.2022 02:35
Дана точка на плоскости с координатами (x,y). Составить программу, которая выдаёт одно из сообщений да , нет , на границе в зависимости от того, лежит ли точка внутри заштрихованной...
АлинаТюлька
26.12.2022 04:50
Расскажите о том как защитить информацию в компьютере от компьютерных вирусов...
wur1k
27.01.2023 23:50
Презентація на тему: пристрої для передавання інформац хотя бы чем то ...
Marys67
01.11.2022 01:12
Очень надо Задача на фото....
vlada410
21.11.2021 17:37
Придумай команды которые на твой взгляд может исполнять компьютер...
Катя7544
21.11.2021 17:37
1.какая информация содержится в видеопамяти? 2.сколько битов видеопамяти на один пиксель требуется для хранения двухцветного; четырехцветного; восьми цветного; шестнадцати...
Niger0000rt
21.11.2021 17:37
Прочитай и зпчеркни команды которые компьбтер не может исполнять: придумай алгоритм ,скажи ответ, посмотри на экран, проверь результат решения,реши ,составь программу для себя,исполни...
Arina8411
10.11.2020 06:44
по ка.яз. только не пишите что попало ...
senyaragimovoy1awn
18.07.2020 15:15
Довжина ламДовжина ламаної МNKР, яка складається з трьох ланок, дорівнює 58 см, до того ж довжина ланки NK на 5 см менша за МN, а КР у 5 разів більша за MN. Знайти довжину...
Балерина2017
02.01.2020 07:16
Першу школу на Русі, де навчали медичної справи, заснував:...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
// Внимание! Если программа не работает, обновите версию!
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.