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

Составить программу в паскале. Найти минимальный элемент массива А(Т,Т), число Т и элементы массива вводятся с клавиатуры.

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

Var i,j,T,n,min:longint;

begin
read(T);
for i := 1 to T do
for j := 1 to T do
begin
read(n);
if (i = 1) and (j = 1) then min := n else if n end;
writeln(min);
end.

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

Форма вопроса доступна на полной версии этой страницы.