Даны три вещественных числа a,b,c. Проверить,выполняется ли равенство a<b<c - Pascal ABC

Pascal ABC

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Рейтинг 4.55/58:

@maksibon 0 / 0 / 0 Регистрация: 17.01.2013 Сообщений: 53

	Даны три вещественных числа a,b,c. Проверить,выполняется ли равенство a<b<c 19.01.2013, 12:02. Показов 12261. Ответов 3 Метки нет (Все метки) Даны три вещественных числа a,b,c. Проверить,выполняется ли равенство a<b<c. 0

Лучшие ответы (1)

Сообщение: #4027017

IT_Exp

Эксперт

34794 / 4073 / 2104

Регистрация: 17.06.2006

Сообщений: 32,602

Блог

19.01.2013, 12:02

Ответы с готовыми решениями:

Процедуры. Даны три вещественных числа. Составить процедуру нахождения целой части числа
2. Даны три вещественных числа. Составить процедуру нахождения целой части числа. Найти сумму преобразованных чисел. Помогите плз, завал...

Ввести три числа x,y,z и проверить выполняется ли условие x>y>z
Ввести три числа x,y,z и проверить выполняется ли условие x>y>z (задача вроде не сложная, но очень нужна помощь... Заранее большое...

Даны три вещественных числа a, b, c. Выяснить, существует ли треугольник со сторонами a, b, c.
2.Даны три вещественных числа a, b, c. Выяснить, существует ли треугольник со сторонами a, b, c. *Если треугольник существует, определить,...

CodeR

Фрилансер

3418 / 2815 / 3000

Регистрация: 08.02.2012

Сообщений: 8,603

Записей в блоге: 1

19.01.2013, 13:17

Pascal
1
writeln((a<b)and(b<c));

maksibon

0 / 0 / 0

Регистрация: 17.01.2013

Сообщений: 53

19.01.2013, 20:23 [ТС]

Сообщение от CodeR

Pascal
1
writeln((a<b)and(b<c));

Сообщение от CodeR

1
writeln((a<b)and(b<c));

а можешь написать полностью все с чтобы скопировать в паскаль и работало,а то я в программировании ничего не понимаю.

CodeR

Фрилансер

3418 / 2815 / 3000

Регистрация: 08.02.2012

Сообщений: 8,603

Записей в блоге: 1

19.01.2013, 21:15

Сообщение было отмечено maksibon как решение

Решение

Pascal
1
2
3
4
5
Var a,b,c:real;
Begin
    write('a,b,c: ');readln(a,b,c);
    writeln((a<b)and(b<c));
End.

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

BasicMan

Эксперт

29316 / 5623 / 2384

Регистрация: 17.02.2009

Сообщений: 30,364

Блог

19.01.2013, 21:15

Помогаю со студенческими работами здесь

Даны три вещественных числа. Выбрать из них те, которые принадлежат интервалу (1,3)
Даны три вещественных числа. Выбрать из них те, которые принадлежат интервалу (1,3)

Даны три произвольных числа, проверить, является ли хотя бы одно из этих чисел квадратом целого числа
Даны три произвольных числа A,B,C. Если хотя бы одно из этих чисел является квадратом целого числа, то вывести на экран сообщение...

даны три числа. Проверить будут ли они пифагоровы
даны три числа. Проверить будут ли они пифагоровы, т.е. такими для которых сумма квадратов двух из них равна квадрату третьего. Если числа...

Даны 2 матрицы А и B. Проверить равенство
Даны 2 матрицы А и B. Проверить равенство: (А+B)’=А’+B’ Где А, B – исходные матрицы А’, B’ – транспонированные матрицы С помощью...

Даны три одномерных массива вещественных чисел А[1.6], В[1.6], С[1.6]
Найти общую сумму положительных элементов в массивах. Решить, использовав подпрограмму функцию.

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
Кто-нибудь знает, где можно бесплатно получить настольный компьютер или ноутбук? США. Programma_Boinc 26.12.2025 Кто-нибудь знает, где можно бесплатно получить настольный компьютер или ноутбук? США. Нашел на реддите интересную статью под названием «Кто-нибудь знает, где получить бесплатный компьютер или. . .	Thinkpad X220 Tablet — это лучший бюджетный ноутбук для учёбы, точка. Programma_Boinc 23.12.2025 Рецензия / Мнение/ Перевод Нашел на реддите интересную статью под названием The Thinkpad X220 Tablet is the best budget school laptop period . Ниже её машинный перевод. Thinkpad X220 Tablet —. . .	PhpStorm 2025.3: WSL Terminal всегда стартует в ~ and_y87 14.12.2025 PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .	Как объединить две одинаковые БД Access с разными данными VikBal 11.12.2025 Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.	Новый ноутбук volvo 07.12.2025 Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro
Музыка, написанная Искусственным Интеллектом volvo 04.12.2025 Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .	От async/await к виртуальным потокам в Python IndentationError 23.11.2025 Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .	Поиск "дружественных имён" СОМ портов Argus19 22.11.2025 Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .	Сколько Государство потратило денег на меня, обеспечивая инсулином. Programma_Boinc 20.11.2025 Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .	Ломающие изменения в C#.NStar Alpha Etyuhibosecyu 20.11.2025 Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .

Наверх