Паскаль формат входных данных сначала задано число n — количество элементов в массиве (1n35). далее через пробел записаны n чисел — элементы массива. формат выходных данных необходимо вывести значение наибольшего элемента в массиве.

185

277

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

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

Ashmalikova

Информатика

4,8(19 оценок)

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

208дитма802

Информатика

4,8(21 оценок)

Pascal const n = 10; //кол-во студентов //можно сделать с вводом с клавиатуры var i,a : integer; o : array[2..5] of integer; begin randomize; for i : =2 to 5 do o[i] : = 0; for i : = 1 to n do begin a : = 2 + random(4); o[a] : = o[a] +1; end; for i : = 2 to 5 do writeln (i,'=',o[i]); end.