МОДЕРАТОРЫ И АДМИНИСТРАТОРЫ ПОМОГИТЕ! ЧЕРЕЗ 20 мин сдавать на оценку!!
Вещественные числа х, у, z являются исходными данными для следующего алгоритма: 1) переменной m присвоить значение х; 2) сравнить значения m и у: если у больше m, переменной m присвоить значение у; 3) сравнить значения m и z: если z больше m, переменной m присвоить значение z.
Выясните, какую решает этот алгоритм. запишите его на языке программирования pascal. решите аналогичную для чисел х, у, z и w.
Answers & Comments
Это алгоритм поиска максимального значения
begin
var (x, y, z) := ReadReal3('Введите x, y, z:');
var m := x;
if y > m then
m := y;
if z > m then
m := z;
Println('Максимальное значение равно', m)
end.
Для четырех переменных:
begin
var x, y, z, w: real;
Print('Введите x, y, z, w:');
Read(x, y, z, w);
var m := x;
if y > m then
m := y;
if z > m then
m := z;
if w > m then
m := w;
Println('Максимальное значение равно', m)
end.
===== PascalABC.NET =====