Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Makspoerty
22.02.2022 02:03 •
Информатика
Даны три числа a,b и c составьте программу на паскале которая проверяет выполнение условия a
Показать ответ
Ответ:
tofik4
07.10.2020 20:54
//PascalABC.NET
//Версия 3.3, сборка 1611
begin
var (a,b,c):=ReadReal3();
write((a<b) and (b<c));
end.
0,0
(0 оценок)
Ответ:
yaam13
07.10.2020 20:54
£include <bits/stdc++.h>
using namespace std;
const int N = int(1e5) + 500;
int a[N], mn = 10000000, mx;
int main () {
for(int i = 1; i <= 3; i++) {
cin >> a[i];
mn = min(a[i], mn);
mx = max(a[i], mx);
}
if(a[1] == mn) {
if(a[3] == mx) {
cout << @[email protected];
return 0;
}
}
cout << @[email protected];
return 0;
}
0,0
(0 оценок)
Популярные вопросы: Информатика
JuliaNikolaenko13
12.04.2021 19:47
Дописать программу в паскаль. ниже. не знаю как сделать ее со скобками. напишите программу, которая вычисляет выражение, состоящее из трех чисел и двух знаков (допускаются...
Всезнаюшка15
27.11.2021 17:37
Написать, программу, которая решает проблему: -ввести а с клавиатуры -найти a^8 ( а в восьмой степени) используя sqr. -вывести ответ...
228795111
05.07.2021 10:14
На основании исходных данных необходимо написать программу и получить ответ. Рассматривается множество целых нечетных чисел, принадлежащих числовому отрезку [-1000;...
furymalice
05.02.2023 12:06
На основании исходных данных необходимо написать программу и получить ответ. Рассматривается множество целых нечетных чисел, принадлежащих числовому отрезку [-1000;...
lera1059
06.09.2021 07:57
решить 26418(8)+110112(2)-FB16(16)=?(10) в скобках система счисления...
тот22
04.12.2020 06:13
Написать программу на каждую задачу dev c++ ( программа должна работать)...
foward11
13.04.2021 14:09
ЗАДАНИЯ1. Подпишите названия сакских племён,живших на территории Казахстана....
Лейла786
13.04.2021 14:09
До розчину Натрій карбонату долийте розчин хлоридної кислоти Що гаєте? Складіть молекулярне, повне та скорочене рівняння реакції...
jasmina14
13.04.2021 14:09
Па графику изображенному на рисунке найти значение функции при икс ровно 6 значение и аргумента при котором игрик ровно 3 ...
Василий2005
23.11.2020 20:39
Найди значения выражения b*c и b/c B 8000 1000 15000 600 C 10 100 10 100...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
//Версия 3.3, сборка 1611
begin
var (a,b,c):=ReadReal3();
write((a<b) and (b<c));
end.
using namespace std;
const int N = int(1e5) + 500;
int a[N], mn = 10000000, mx;
int main () {
for(int i = 1; i <= 3; i++) {
cin >> a[i];
mn = min(a[i], mn);
mx = max(a[i], mx);
}
if(a[1] == mn) {
if(a[3] == mx) {
cout << @[email protected];
return 0;
}
}
cout << @[email protected];
return 0;
}