В целочисленном массиве из 31 элемента записаны значения температуры по дням в мае месяце...

0 голосов
98 просмотров

В целочисленном массиве из 31 элемента записаны значения температуры по дням в мае месяце ( возможные значения температуры от 0 до 25 ). Найти значение температуры в самый теплый день


Информатика (16 баллов) | 98 просмотров
Дано ответов: 2
0 голосов

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.

(3.9k баллов)
0 голосов

Avascript:var дни=[];for(var сч=0;сч<31;сч++)дни.push(Math.round(Math.random()*25));alert(дни.indexOf(Math.max.apply(null, дни)));