В массиве хранится информация о среднедневной температуре декабря. Составьте программу,...

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

В массиве хранится информация о среднедневной температуре декабря. Составьте программу, которая подсчитывает, сколько в декабре было дней с нулевой, отрицательной и положительной температурной.


Информатика (30 баллов) | 33 просмотров
0

Какой язык программирования ?

0

Pascal ABC

Дан 1 ответ
0 голосов

begin

 var a := ArrRandom(31, -25, 5); a.Println;

 Println('кол-во дней с ''+'' температурой:', a.Count(x -> x > 0));

 Println('кол-во дней с ''-'' температурой:', a.Count(x -> x < 0));

 Println('кол-во дней с ''0'' температурой:', a.Count(x -> x = 0))

end.


image
(2.5k баллов)