1. Алгоритм, записанный на «понятном» компьютеру языке программирования

169

445

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

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

venerkaasanova

Информатика

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

Последовательность нулей и единиц

OleskaSwag

Информатика

4,5(90 оценок)

Var a: array[1..100] of integer; i, max: integer; begin writeln('построенный массив '); for i : = 1 to 100 do begin a[i] : = random(251) - 85; write(a[i], ' '); if i = 76 then max : = a[i]; if i > 76 then if a[i] > max then max : = a[i]; end; writeln('| максимальный элемент из последних 25-ти чисел массива равен ', max); end.