ДАНЫ ТРИ ЧИСЛА A,B и C СОСТАВЬТЕ ПРОГРАММУ ** ПАСКАЛЕ КОТОРАЯ ПРОВЕРЯЕТ ВЫПОЛНЕНИЕ...

Question

ДАНЫ ТРИ ЧИСЛА A,B и C СОСТАВЬТЕ ПРОГРАММУ НА ПАСКАЛЕ КОТОРАЯ ПРОВЕРЯЕТ ВЫПОЛНЕНИЕ УСЛОВИЯ A<B<C

Answer 1

//PascalABC.NET
//Версия 3.3, сборка 1611
begin
var (a,b,c):=ReadReal3();
write((aend.

Answer 2

£include

using namespace std;

const int N = int(1e5) + 500;

int a[N], mn = 10000000, mx;

int main () {
for(int i = 1; i <= 3; i++) {<br>cin >> a[i];
mn = min(a[i], mn);
mx = max(a[i], mx);
}
if(a[1] == mn) {
if(a[3] == mx) {
cout << @<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="247d617764">[email protected];
return 0;
}
}
cout << @<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="77393837">[email protected];
return 0;
}