profile
Опубликовано 6 лет назад по предмету Информатика от derzku2802

Написать программы:1. Даны данные температуры (отриц. и полож.) за 10 дней. найти сколько дней температура была больше 0.2. Дана скорость чтения 10 пятиклассников (двухзнач.)Найти среднюю скорость чтения в 5 классе.
ПАСКААЛЬ!

  1. Ответ
    Ответ дан what46
    Д е р ж и и и и и и и и и и и и и)))
    1. Ответ
      Ответ дан Пельмешшш
      Крайне нерационально. Гораздо удобнее использовать циклы
    2. Ответ
      Ответ дан Пельмешшш
      var i,count: integer;
      t: real;
      begin
      for i := 1 to 10 do
      begin
      write('t',i,'= ');
      readln(t);
      if t > 0.2 then inc(count);
      end;
      write('Температура была выше 0.2 градусов ',count,' дней.');
      end.
    3. Ответ
      Ответ дан Пельмешшш
      Например
Самые новые вопросы