Program a2; var n, i, min, max, x:integer; begin Writeln ('Введите колицество человек в классе:') ; Readln (n) ; Writeln ('Введите рост 1 ученика:') ; readln (x) ; min:=x; max:=x; for i:=2 to n do begin Writeln ('Введите рост ', i,' ученика:') ;
Ответы (1)
Что можно отнести к отличительным признакам объекта? Выберите один из 4 вариантов ответа: Имя, свойства, действия, поведение, состояние. Имя, свойства, действия, состояние. Свойства, действия, поведение, состояние.
Ответы (1)