Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
ilia39loh
16.04.2021 22:36 •
Информатика
Даны действительные числа x,y,z. вычислить max (x+y+z,xyz).
Показать ответ
Ответ:
гвониха
28.06.2020 18:42
Uses crt;
var x,y,z:real;
begin
read(x,y,z);
if x+y+z>x*y*z then
writeln(x+y+z)
else
writeln(x*y*z);
end.
0,0
(0 оценок)
Ответ:
акл2
28.06.2020 18:42
Uses crt;
var x,y,z,max: real;
begin
readln(x,y,z);
if x+y+z>x*y*z then writeln('max=x+y+z=',x+y+z);
if x+y+z<x*y*z then writeln('max=x*y*z=',x*y*z);
if x+y+z=x*y*z then writeln('x*y*z=x+y+z=',x*y*z);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
quipklack
30.01.2022 02:50
Какой результат получится при вычислении выражения 253 \ 10? в VBA...
Тупой7А
20.01.2020 12:50
Сколько букв можно закодировать четырехзначных двоичным кодом 2 класс...
bxanzoda
30.04.2022 23:58
Синтез. Оценивание При решении программирован ные правила зап Выражением и числовых и логических 10. Определите тип данных: не по андо а то со а) цифры в трехзначном числе,...
maksikus1
14.02.2021 18:34
Некоторое растровое изображение размером 1280 ´ 1024 было сохранено в файле p1.gif. Каков информационный объем файла p1.gif?...
AlinaRaytman
23.03.2021 18:01
Найди информационный объем (в битах) растового изображения размером 51×51 пикселя,если известно,что используется палитра из 4 цветов. ответ:бит...
ssssss213r532
16.06.2020 05:43
Укажите все целые числа,которые увеличиваются на 20%,если их цифры записать в обратном порядке. написать программу только с циклом for или while....
zhoha2220
07.05.2020 03:30
Крокодил гена играет сам с собой в такую игру: у него есть мешок, в котором лежит 506 конфет. он может или взять из мешка 300 конфет или положить в него 198 конфет. других...
Полина112006
24.06.2021 05:12
Алфавит содержит восемь символов,выпишите все кодовые комбинации.какой разрядности потребуется двоичный код...
Николай2004
20.01.2023 07:11
Как убрать водяной знак из пдф документ бесплатно? ! большое!...
nicita13254769p06wrf
20.10.2020 05:47
Көшпелі мал шаруашылығы пайда болуының себептерін маңыздылығына қарай атапкөрсетіңіз1.2.3.4....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var x,y,z:real;
begin
read(x,y,z);
if x+y+z>x*y*z then
writeln(x+y+z)
else
writeln(x*y*z);
end.
var x,y,z,max: real;
begin
readln(x,y,z);
if x+y+z>x*y*z then writeln('max=x+y+z=',x+y+z);
if x+y+z<x*y*z then writeln('max=x*y*z=',x*y*z);
if x+y+z=x*y*z then writeln('x*y*z=x+y+z=',x*y*z);
end.