МЧ
Мирель Чолпонкулов

Даны 3 вещественных числа a, b, c, проверить, выполняется ли неравенство a>b>c?

Нужно решить в паскале. Помогите пожалуйста

ВБ
Василий Брюхачев

if (b < a) and ( b > c) then writeln('yes') else writeln('no');

Ольга Полищук
Ольга Полищук

Проще всего вот так:

WriteLn('Неравенство a>b>c верно = ', (a > b) and (b > c));

Похожие вопросы
Помогите составить программу в паскале. Даны три числа a,b,c. Найти произведение (a*b*c) и max из трех.
даны 3 числа, а, в, с, удвоить каждое число если а>=b>=c, если нет то заменить эти числа их модулями
докажите что если a,b,c- целые числа и a+b+c делится на 6, то a^3+b^3+c^3 делится на 6
даны числа a>0 b>0 c>0 сравните числа a и b если abc=c и bc>c
напишите пожалуйста программу на с++.дано а=10,b=5,c=2.что больше (a+b)/c или (a-b)/c
даны три числа a,b,c,если a
Докажите, что если ac+bc+ac=0, (a-b)*(a-c)+(b-c)*(b-a)+(c-a)*(c-b)=a(квадрате) +b(квадрате) +c(квадрате).
Доказать, что для любых неотрицательных чисел a, b, c и d выполняется неравенство
Задано n розкласти його на такі числа a, b, c щоб a + b + c = a * b * c = n ???С++
Даны действительные числа a, b, c (a> 0).