Есть ответ 👍

Составить блок-схему нахождения наибольшего из n чисел

134
364
Посмотреть ответы 1

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


Var a: array [1..31] of integer; i,m: integer; begin for i: = 1 to 31 do a[i]: = random(26); writeln(a); for i: =1 to 31 do if a[i]> m then m: =a[i]; write('самая высокая температура - ',m,' наблюдалась: '); for i: =1 to 31 do if a[i]=m then write(i: 3); write(' мая') end.

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