Данные по температуре воздуха за декаду ноября хранятся в массивеюопределить,сколько раз температура опускалась ниже "-10" градусов.заполнение массива осуществить с клавиатуры.
Oooooooooooooool
1
17.03.2019 15:30
5
Другие вопросы по теме Информатика
oliaborisova123
01.06.2019 10:50
катарина68
13.09.2019 08:03
Самина2006
13.09.2019 08:01
aliskylivar
13.09.2019 09:10
OOONIMOOO
24.09.2019 21:12
sakds
24.09.2019 21:15
katrinsepp
18.09.2019 06:40
sever174
16.08.2019 22:20
Популярные вопросы
- Заменить выделенные наречия соответствующими по смыслу фразеологическими оборотами....
2 - Назвіть міста Італії й пам ятки які згадав у вірші Дж. Родарі...
1 - путешественник за первый час 3 целых 4/5 км за второй 4целых 3/8 км за третий 4...
3 - проти яких негативних рис у людських характерах і явищ у житті суспільства спрямована...
2 - Найти выталкивающую силу,которая действует на тело объемом 0.36 м³ в воде , С подробным...
3 - Спираль утюга имеет сопротивление 44 Ом и включена в цепь с напряжением 220 В....
3 - Дубовый брусок, погруженный в воду целиком, вытесняет воду объёмом 1,2 м^3, а плавающий...
3 - Надо написать про мужчину >...
3 - 2-тапсырма: Б. Момышұлы Ұшқан ұн повесіндегі образдар жүйесі (повестегі санаулы...
1 - При каких условиях водород взаимодействовать с галогенами серы, азота ?Вычислите...
3
Program Pr1;
uses crt;
var mas:array[1..30] of integer;
i,p:integer;
Begin
clrscr;
for i:=1 to 30 do begin
writeln('T za ',i,' den');
readln(mas[i]);
end;
p:=0;
for i:=1 to 30 do if mas[i]<-10 then p:=p+1;
writeln(p);
end.