Дан массив,состоящий из 20-ти целых чисел.выяснить,на сколько максимальный элемент превосходит минимальный : 3 ,котаны: 3 нужна программа в паскале

164

256

Посмотреть ответы 2

Ответы на вопрос:

King575

Информатика

4,5(47 оценок)

Var a: array [1..20] of integer; i,max,min,r: integer; begin max: =0; min: =24000; for i: =1 to 20 do readln(a[i]); for i: =1 to 20 do if a[i]< min then min: =a[i]; for i: =1 to 20 doif a[i]> max then max: =a[i]; r: =max-min; writeln; writeln(r); readln; end.

davas255

Информатика

4,7(50 оценок)

После того, как masterboot (загрузчик ос) из биоса попадет в оперативную память. это происходит между этапом самотестирования пк (белые буквы на черном фоне) и появлением на экране логотипа ос