Question

Введите рост трёх девочек. Маши, Наташи и Оли, узнайте которая подружка самая маленькая

Answer 1

// PascalABC.NET 3.3, сборка 1576 от 16.11.2017
// Внимание! Если программа не работает, обновите версию!

begin
var a:=ReadReal('Введите рост Маши');
var b:=ReadReal('Введите рост Наташи');
var c:=ReadReal('Введите рост Оли');
if min(a,min(b,c)) = a then Writeln('Маша');
if min(a,min(b,c)) = b then Writeln('Наташа');
if min(a,min(b,c)) = c then Writeln('Оля');
end.

Answer 2

Поправил*

Answer 3

#include <iostream>

using namespace std;

int main() {
cout << "Привет, Мир!" << endl;
char t;
t = 't';

do {
cout<<'n';
int a=0, b=0, c=0;
cout << "ВВедите, пожалуйста, рост Маши: ";
cin >> a;
cout << "ВВедите, пожалуйста, рост Наташи: ";
cin >> b;
cout << "ВВедите, пожалуйста, рост Оли: ";
cin >> c;
int d=0;
if (a < b && a < c) d = 1;
if (b < a && b < c) d = 2;
if (c < b && c < a) d = 3;

if (a == b && a < c) d = 4;
if (a == c && a < b) d = 5;
if (b == c && b < a) d = 6;

if (a == b&&b == c) d = 7;

cout<<'n';
switch (d) {
case 1:
cout << "Рост Маши самый маленький";
break;
case 2:
cout << "Рост Наташи самый маленький";
break;
case 3:
cout << "Рост Оли самый маленький";
break;
case 4:
cout << "Рост Маши и Наташи одинаковый, а Оля выше";
break;
case 5:
cout << "Рост Маши и Оли одинаковый, а Наташа выше";
break;
case 6:
cout << "Рост Оли и Наташи одинаковый, а Маша выше";
break;
case 7:
cout << "Оля, Маша и Наташа одинакового роста";
break;
}
cout<<'n';
cout<<'n';
cout<< "Повтрить? (Введите любой символ или '0' - для выхода )";

cin>>t;
}while (t!='0');
return 0;
}