В массиве хранится информация о росте 25 человек.Определить,насколько рост самого высокого человека превышает рост самого низкого.
More Questions From This User See All
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
var a:array [1..25] of integer;
i,max,min:integer;
begin
read(a[1]);
max:=a[1];
min:=a[1];
for i:=2 to 25 do
begin
read(a[i]);
if max<a[i] then max:=a[i];
if min>a[i] then min:=a[i];
end;
write(max-min);
end.