Вход
Регистрация
О проекте Как заработать?
63

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

osullivan 02 сентября 2022

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

категория: информатика
ответить
в избранное

57

Программа в приложении… .

пользователи выбрали этот ответ лучшим
комментировать
в избранное ссылка отблагодарить

Знаете другой ответ?
Другие вопросы по информатике
elzira
02 сентября 2022
1
ответ
13. Соотнесите сетевые устройства и термины с их определениями. 1) MAC-адрес А) устройство, позволяющее компьютеру взаимодействовать с другими устройствамисети-‘это что? 2) IP-адрес B) специализированный сетевой компьютер, пересылающий пакеты данных между различными сегментами сети 3) сетевой адаптер C) уникальный идентификатор, сопоставляемый с различными типами оборудования для компьютерных сет
andry4
02 сентября 2022
1
ответ
Составить программу нахождения ширины прямоугольника, если площадь и длина вводятся с клавиатуры.
olg15099
02 сентября 2022
1
ответ
Создайте приложение, на форму которого помещены компоненты: Button — 1 шт. Label — 1 шт. Edit — 2 шт.
sntcs
02 сентября 2022
1
ответ
10. Какие из перечисленных имен файловудовлетворяют маске? a*сk*.*1) black.avi 2) chacke.bmp3) norack.txt4) blask.png5) blaeck.docx 6) checker.exe
medved
02 сентября 2022
1
ответ
Найдите сумму кратных 7 чисел, меньших 100
viktor-59
02 сентября 2022
1
ответ
Паскаль. Программа работает, но выдает не тот результат — вставляет заданное число на первое место изачем-то меняет другими числами оставшиеся элементы массива. Что надо исправить? Условие: Вставить перед первым четным элементом массива заданное число.program vstavka; var i,n,k,z: integer; a: array[1… 1000] of integer; beginassign (input,'input.txt'); assign (output,'output.txt'); reset (input); rewrite (output); readln (n,z); for i: =1 to n do read (a[i]); i: =a[1]; for i: =1 to n doif a[i] mod 2=0 thenbeginfor k: =n+1 downto k+1 doa[i]: =a[i-1]; a[k]: =z; n: =n+1; break; end; for i: =1 to n do write (a[i],'); close (input); close (output); end.
poleznyy
02 сентября 2022
1
ответ
Из шеснадцатиричной перевести в десятичную систему счисления 12F,8
code-hunter
02 сентября 2022
1
ответ
Как из слова бант, заменяя по одной букве прийти к слову коса? (слово должно быть сущ., вИм. Падеже) бант-коса
iceberg
02 сентября 2022
1
ответ
К поисковому серверу Интернет было выполнено 6 запросов. Расположите номера запросов через запятую в порядке возрастания количества страниц, которые найдет поисковый сервер по каждому запросу.1. Победители | призеры | стрельба 2. Победители & стрельба 3. Победители | (эстафета & стрельба) 4. Победители & призеры & Россия & стрельба 5. Победители & Россия & стрельба 6. (победители | призеры) & стрельба
Задайте свой вопрос

ПОПУЛЯРНОЕ
elzira, 02 сентября 2022
13. Соотнесите сетевые устройства и термины с их определениями
andry4, 02 сентября 2022
Составить программу нахождения ширины прямоугольника, если площадь и длина вводятся с клавиатуры
olg15099, 02 сентября 2022
Создайте приложение, на форму которого помещены компоненты: Button — 1 шт. Label — 1 шт. Edit — 2 шт
sntcs, 02 сентября 2022
10. Какие из перечисленных имен файловудовлетворяют маске?
medved, 02 сентября 2022
Найдите сумму кратных 7 чисел, меньших 100
viktor-59, 02 сентября 2022
Паскаль. Программа работает…
poleznyy, 02 сентября 2022
Из шеснадцатиричной перевести в десятичную систему счисления 12F,8
code-hunter, 02 сентября 2022
Как из слова бант, заменяя по одной букве прийти к слову коса?
iceberg, 02 сентября 2022
К поисковому серверу Интернет было выполнено 6 запросов
27400
Алгебра
14821
Английский язык
14216
Биология
7369
Другой
720
Экономика
18828
Физика
8304
География
15850
Геометрия
5255
Информатика
11818
История
23332
Химия
15992
Литература
73118
Математика
8152
Обществознание
465
Правоведение
46271
Русский язык
Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...