Составить программу на языке програмирования паскаль В группе 7 человек рост вводится с клавы программма выводит на экран самого ниского
Обычная задачка на минимум сonst n=7; var i:byte; c:array[1..n] of real; min:real; begin for q:=1 to n do read(c[q]); min:=c[q]; for q:=2 to n do if min>c[q] then min:=c[q]; write(min); end..
Program поставь перед потом uses имя какое нибудь;
ну вот и пиши.