Создайте массив, содержащий 15 различных символов. Отсортируйте его по убыванию. После этого определите и выведите на экран «наименьший» и «наибольший» символы.
Создайте массив, содержащий 15 различных символов. Отсортируйте его по убыванию. После этого определите и выведите на экран «наименьший» и «наибольший» символы.
Гость
Ответ(ы) на вопрос:
Гостьvar a:array[1..15] of char; i,min,max:integer; Begin min=1; max=1; for i:= 1 to 15 do begin a[i]:= chr(random(256)); if a[min]>a[i] then min:=i; if a[max]
Не нашли ответ?
Похожие вопросы