Задание
Расставьте операторы программы нахождения минимального числа в правильном порядке:
- Program MinChislo;
- Var A, I, Min : Integer;
- Begin
- Min:=100;
- For I:=1 to 10 do
- Begin
- Write\('Vvedite chislo '\);
- Readln\(A\);
- If A < Min then Min:=A;
- end;
- Writeln\('MIN=',Min\);
- end.