Опубликовано 5 лет назад по предмету Информатика от Flasch

В массиве хранятся сведения о количестве осадков(в мм),выпадавших ежедневно в сентябре.Составьте программу,которая подсчитывает количество дождливых дней (h [i] >0)
Люди помогите пожалуйста!Срочна надо,кому не трудно...

Ответ

Ответ дан Issenpilon

const N = 30; // Количетсво дней
var
i,count:integer;
h: array [1..N] of integer;
begin
count:=0;
writeln('Введите количество осадков');
for i:=1 to N do
read(h[i]);
for i:=1 to N do
if h[i]>0 then
count:=count+1;
writeln('Количество дождливых дней ', count)
end.

В первой строке указываем количество дней. Это константа N
Далее объявляем, что переменная count равна 0. В этой переменной мы будем хранить количество дней с осадками.
Далее мы вводим с клавиатуры 30 чисел, показывающих осадки.
Потом мы проверяем, если число в массиве больше нуля, то мы увеличиваем count на единицу. Тоесть прибавляем +1 день с осадками.
В конце выводим количество дней с осадками
1. Ответ
  
  Ответ дан Flasch
  
  что означает read (h[i])?
2. Ответ
  
  Ответ дан Flasch
  
  Скажи пожалуйста
3. Ответ
  
  Ответ дан Flasch
  
  тебе же не трудно (
4. Ответ
  
  Ответ дан Flasch
  
  мне это очень важно
5. Ответ
  
  Ответ дан Issenpilon
  
  ввод числа с клавиатуры

Самые новые вопросы

Другие предметы - 5 лет назад

Сочинение-рассуждение. прочитайте текст. есть у меня внучка. однажды она говорит: — у веры в субботу день рождения. она

Другие предметы - 5 лет назад

Л.н. толстой. как боролся русский богатырь как сказал иван о своей силе? найдите ответ в тексте. запишите.

История - 5 лет назад

Кто такой мильтиад и какова его роль в победе над персами?

История - 5 лет назад

Какие примеры н. м. карамзин использует для разъяснения пользы новой системы престолонаследия? согласны ли вы с позицией

География - 5 лет назад

Дополните схему. она поможет вам лучше усвоить содержание §1.: 1 что изучает география 2 с помощью чего 3 зачем изучают

Информация