В массиве хранится информация о росте 25 человек. Определить, на сколь-ко рост самого высокого человека превышает рост самого низкого.

НА С

Question

Информатика

Станя

28 марта, 11:13

В массиве хранится информация о росте 25 человек. Определить, на сколь-ко рост самого высокого человека превышает рост самого низкого.

НА С

+5

Ответы (1)

Знаете ответ?

Антоныч · Answer 1

Program z1;

var a:array[1 ... 25] of integer;

Hmax, Hmin, i, R:integer;

begin

for i:=1 to 25 do readln (a[i]) ;

Hmax:=a[1];

Hmin:=a[1];

for i: = 1 to 25 do

begin

if Hmax
if Hmin>a[i] then Hmin:=a[i];

end;

R:=Hmax-Hmin;

writeln (R) ;

end.

В массиве хранится информация о росте 25 человек. Определить, на сколь-ко рост самого высокого человека превышает рост самого низкого.НА С

В массиве хранится информация о росте 25 человек. Определить, на сколь-ко рост самого высокого человека превышает рост самого низкого.

НА С