iİnformatikanın məktəbdə tədrisi

З-9

Задачи на целые числа без использования цикла


Даны три действительных числа X, Y, Z. Найти максимальное из этих трех чисел.

 Алгоритм в программе А1_9a очень простой: если одно из чисел больше всех других, то оно максимально. А вот в  в программе А19b  мы применили другой алгоритм (вообще более интересный - запомните его!). Мы присвоили первое число переменной max и затем поочередно сравнивали эту переменную с другими числами. Если очередное число больше max, max делали равным этому числу.

Примечание: В этой задаче появились числа нового типа – действительные числа. В Pascal – это тип  real, в С++ - double.

 

Program A1_9a;

var

x,y,z,max:real;

begin

 readln(x,y,z);

 if (x>y) and (x>z)  then max:=x

                     else

  if (y>x) and (y>z) then max:=y

                     else max:=z;

 writeln(max:0:6);

 readln;

end.

//Program A1.9a

#include <iostream>

 

using namespace std;

 

int main()

{  double x,y,z,max;

    cin>>x>>y>>z;

    if(x>y && x>z) max=x;

                       else

    if(y>x && y>z) max=y;

                       else max=z;

    cout<<max<<endl;

    return 0;

}

Program A1_9b;

var

x,y,z,max:real;

begin

 readln(x,y,z);

 max:=x;

 if (y>max)  then max:=y;

 if (z>max)  then max:=z;

 writeln(max:0:6);

 readln;

end.

//Program A1.9b

#include <iostream>

 

using namespace std;

 

int main()

{double x,y,z,max;

    cin>>x>>y>>z;

    max=x;

    if(y>max) max=y;

    if(z>max) max=z;

    cout<<max<<endl;

    return 0;

}