Через паскаль! тема: «поиск наибольшего или наименьшего элемента массива» написать программу, которая определяет наибольшее по модулю число в массиве из 10 введенных пользователем чисел. не использовать: const, count и другие, которые не по теме!

137

366

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

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

laravysotskaya

Информатика

4,7(40 оценок)

Var a: array[0..10] of integer; i,n,m: integer; begin m: =0; for i: =0 to 9 do begin writeln('введите ',i+1,' число'); readln(n); a[i]: =abs(n); end; for i: =0 to 9 do begin if m< a[i] then m: =a[i]; end; writeln('самое большое число в массиве : ',m); end.