Информатика, опубликовано 2018-08-22 20:50:00 by Гость

дан массив состоящий из 15 чисел.Найти среди них максимальный и минимальный элемент.

Ответ оставил Гость

Program gt;
var i,max,min:integer;
a:array[1..15]of integer;
begin
for i:=1 to 15 do
read(a[i]);
max:=a[1];
min:=a[1];
for i:=1 to 15 do
begin
if(a[i]>max)then max:=a[i];
if(a[i]end;
writeln(min, ,max);
end.

Не нашли ответа?

Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.