Есть ответ 👍

Свойства информации на примерах

239
386
Посмотреть ответы 2

Ответы на вопрос:

vevgrafov
4,6(16 оценок)

ты это к чему говоришь?

RomisuRomi
4,7(13 оценок)

Var i,n,max,k: integer; b: array[1..n] of integer; begin; writeln('сколько элементов в последовательности? '); readln(n); writeln('введите элементы массива'); for i: =1 to n do  begin readln(b[i]); if b[i]> max then begin  max: =b[i]; k: =i end; writeln('наибольший элемент последовательности =  ',max,'. а его порядковый номер ', k); end.

Популярно: Информатика