В массиве хранится информация о среднедневной температуре за каждый день июля. Определить количество самых прохладных дней в этом месяце.

Question

Информатика

Маруня

26 июля, 11:11

В массиве хранится информация о среднедневной температуре за каждый день июля. Определить количество самых прохладных дней в этом месяце.

+1

Ответы (1)

Знаете ответ на вопрос?

Илария · Answer 1

var

a:array[1 ... 31] of real;

i, k:integer;

min:real;

begin

min:=50;

for i:=1 to 31 do

begin

readln (a[i]) ;

if a[i]
end;

k:=0;

for i:=1 to 31 do

if a[i]=min then k:=k+1;

writeln (k) ;

end.