tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Дано 3 числа. если модуль
Дано 3 числа. если модуль хотя бы одного из них больше 1, то найти их среднее арифметическое, иначе - их произведение
шпион223709
3 29.05.2019 12:20
11
Ответы
Янрей
28.06.2020 14:11
Program gt;
var a,b,c,s:real;
begin
read(a,b,c);
if(abs(a)>1)or(abs(b)>1)or(abs(c)>1) then s:=(a+b+c)/3 else s:=a*b*c;
writeln(s);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
орпасм
15.10.2019 09:42
Все 5-буквенные слова составленные из букв а,н,п, записаны в алфавитном порядке.вот начало списка 1. 2. 3. 4. aaaha5. аaаннзапишите слово, которое стоит на 201-м месте от начала списка...
диман160
15.10.2019 09:43
Смоделируйте таблицу для вычисления стоимости комплектующих компьютера: ноутбук, мышь ипринтер.denenзалишите используемые формулы в таблице используйте зарезервированные функции....
Елизавета1040
15.10.2019 09:50
Стена покрыта квадратной плиткой со стороной m см. на стену повесили картину, известны координаты левого нижнего угла картины, её ширина и высота. определите количество плиток, которые...
ksenyaandreevn
15.10.2019 09:57
Пользуясь формулой, построить таблицы истинности выражений. f = aλbvaλb f = avbλ(bva)λa f = aλ(avb)v(bλa) f=av(bv┐b= ┐c) f= ((p& q)→ (p→ r)) v p f = x v y & ¬ z f = а &...
Анон5сен
15.10.2019 09:59
Определите какую функцию реализует схема на рис 6.13. заполните таблицу истинности для этой схемы. задана логическая функция. постройте логическую схему соответствующую этой функции...
4yfkilo5
15.05.2019 16:58
Из букв а, е, р, и, в, б, п, с, т формируется слово. известно, что слово сформировано по следующим правилам: а) в слове нет подряд идущих двух гласных или двух согласных; б) первая...
k41c0ur
22.11.2019 10:26
Бхдхзях иқгсшасшяс очечол зочғолұш қүдзеж ируш иқгсшқсж жсгсж абайдың кодталған жолдауы...
Лавданим
22.11.2019 10:15
Pascalвычислить произведение первых n множителей 2×4×6×8...
Доминат
09.12.2021 22:01
Проект на тему Изготовление поделки из текстильных материалов план:1.Проблема2.Цель проекта3.Задача4.Исследование(поиск и анализ информации)5.Критерии выбора(первоначальные идеи)6.Выбор...
nazarborovichok
09.12.2021 22:02
УМОЛЯЮ !! НУЖНО НАПИСАТЬ ПРОГРАММУ В ПАСКАЛЕ Користувач вводить чотири цілих числа. Перевірити і вивести на екран повідомлення про те, які з введених чисел входять до діапазону 10…...
Популярные вопросы
2 тапсырма. Сөздерді үлгі бойынша -ға болады/-ге болады формасына ауыстырыңыз.(Замените...
3
Выписать из художественной литературы 5 сложных предложений с различными видами...
3
Синквейн на слово тауелсиздик поиогите...
2
При ривномирному руси играшковый автомобиль розвивае швидкисть 50 см/с и потужнисть...
2
Жаңа сөздер: Жылқы – ер қанаты- лошадь- крылья мужчиныЖылқы- лошадь ...
2
Перевод рассказа Ыбрая Алтынсарина мейiрiмдi бала...
2
Периметр прямоугольника равен 60 см. Какую длину должны иметь стороны прямоугольника,...
3
Время: горови, утро 3. Прочитай отрывок из сказки «Кот в сапогах». Найди имена прилагательныеОбсуди...
2
) Периметр трикутника ABC дорівнює 0,9 м, відрізок AD є бісектрисою, причому BD...
2
Каждый из видов односоставных предложений отличается... (чем?)...
1
var a,b,c,s:real;
begin
read(a,b,c);
if(abs(a)>1)or(abs(b)>1)or(abs(c)>1) then s:=(a+b+c)/3 else s:=a*b*c;
writeln(s);
end.