номер 206 (страница 61) гдз по информатике 8 класс рабочая тетрадь Босова, Босова часть 2

Данная программа на языке Паскаль написана с ошибками. 1. Переменная min не прописана. 2. В команде вывода пропущена ‘ (writeln(‘x=’,x)).

Если исправить данные ошибки, программа будет выводить первоначально присвоенное значение для х, так как переменной min нигде не присваивается значение.

var а, b, с, х, min: real;
begin
writeln ('Введите три числа');
readln (а, b, с);
х := а;
if b‹min then х := b;
if с‹min then x := с;
writeln ('x=' , x);
end.

Введите три числа
10
5
1
x=10
Введите три числа
10
5
7
x=10
Введите три числа
2
10
5
x=2

Переменную min необходимо заменить переменной х, тогда программа будет находить наименьшее значение из трех чисел.

var а, b, с, х: real;
begin
writeln ('Введите три числа');
readln (а, b, с);
х := а;
if b‹x then х := b;
if с‹x then x := с;
writeln ('x=' , x);
end.

Введите три числа
10
5
1
x=1
Введите три числа
10
5
7
x=5
Введите три числа
2
10
5
x=2