75

Составьте программу, которая заполняет массив a[1…

nik91 24 марта 2023

Составьте программу, которая заполняет массив a[1… 100] случайными целыми числами в диапозоне от 1 до 100, затем меняет местами максимальный и минимальныйэлементы.

категория: информатика

65

Program new; var a: array [1… 100] of integer; i,n,p,min,max,mid: integer; beginrandomize; for i: =1 to 100 do begina[i]: =random (101); end; for i: =1 to 100 dobeginif a[i]max thenbeginmax: =a[i]; p: =i; end; end; mid: =a[p]; a[p]: =a[n]; a[n]: =mid; end. Вроде все еще протестируй в паскальна всякий случай

пользователи выбрали этот ответ лучшим

Знаете другой ответ?
Другие вопросы по информатике

ПОПУЛЯРНОЕ
Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...