Сделать программу в паскале ввести 10 чисел и из них найти минимум и максимум
Сделать программу в паскале ввести 10 чисел и из них найти минимум и максимум
Гость
Ответ(ы) на вопрос:
Гостьvar a:array[0..9] of integer; i,min,max:integer; begin for i:=0 to 9 do readln(a[i]); min:=a[0]; for i:=0 to 9 do if(min>a[i]) then min:=a[i]; max:=a[0]; for i:=0 to 9 do if(max
Не нашли ответ?
Похожие вопросы