Предмет: Информатика, автор: germansvalih

в массиве найти минимальный и максимальный элементы вычислить их разность. Программа! Срочно!!! ​


germansvalih: паскаль?
restIess: питон
germansvalih: можешь паскаль?
restIess: паскаль я не знаю
germansvalih: ну ладно, спасибо
restIess: чтобы таких ситуаций не возникало, указывайте язык программирования в заданиях
germansvalih: ок
restIess: добавил паскаль в ответ)
germansvalih: спасибо большое
germansvalih: очень выручил

Ответы

Автор ответа: restIess
2

Python:

a = [21,312,31,55,66,1]

print(max(a)-min(a))

Pascal:

program one;

const N = 10;

var

   mas: array[1..N] of integer;

   i,min, max: integer;

begin

   randomize;

   min := 100;

   max := -1;

   for i:=1 to N do mas[i]:=random(100);

   for i:=1 to N do

writeln(mas[i]);

   for i:=1 to N do begin

       if mas[i] > max then max := mas[i]

       else if mas[i] < min then min := mas[i];

   end;

   writeln(max,'-',min,'=',max-min);    

end.

Похожие вопросы