profile
Размещено 5 лет назад по предмету Информатика от artembogdashko

Нужно написать программу, которая сначала выводит до 30 рандомных чисел от 20 до 85, затем спрашивает число(оно должно вписываться с клавиатуры). После этого нужно вывести на экран числа, которые больше введённого числа.Если таких нет, тогда выводится на экран "нет"

  1. Ответ на вопрос
    Ответ на вопрос дан Аккаунт удален
    ОТДЕЛ Задание+;
    ИСПОЛЬЗУЕТ Вывод ИЗ "...ОтделыОбмен", Приём ИЗ "...ОтделыОбмен", Матем ИЗ "...ОтделыЧисла";

    ПЕР
      массив: РЯД 30 ИЗ ЦЕЛ;
      сч, число: ЦЕЛ;
      найдено: КЛЮЧ;

    УКАЗ
      ОТ сч := 0 ДО РАЗМЕР(массив) - 1 ВЫП
        массив[сч] := УЗК(ВШИРЦЕЛ(Матем.случ() * 65)) + 20;
        Вывод.ЧЦел("%d ", массив[сч], 0, 0, 0)
      КОН;
      Вывод.Цепь("^");
      число := Приём.Число();
      Вывод.Цепь("^");
      найдено := ОТКЛ;
      ОТ сч := 0 ДО РАЗМЕР(массив) - 1 ВЫП
        ЕСЛИ массив[сч] > число ТО
          Вывод.ЧЦел("%d ", массив[сч], 0, 0, 0);
          ЕСЛИ НЕ найдено ТО найдено := ВКЛ КОН
        КОН
      КОН;
      ЕСЛИ НЕ найдено ТО Вывод.Цепь("нет") КОН

    КОН Задание.
    1. Ответ на вопрос
      Ответ на вопрос дан artembogdashko
      Забыл указать, что нужно на языке pascal
    2. Ответ на вопрос
      Ответ на вопрос дан artembogdashko
      ничего не понимаю здесь(
    3. Ответ на вопрос
      Ответ на вопрос дан Аккаунт удален
      А, ну следующий раз вспомнишь.
    4. Ответ на вопрос
      Ответ на вопрос дан Аккаунт удален
      Главное, на Пасрале с английской лексикой понимаешь, а когда тебе русским по белому пишут - не понимаешь.
Не тот ответ на вопрос, который вам нужен?
Найди верный ответ
Самые новые вопросы
tegysigalpa2012
Русский язык - 6 лет назад

Помогите решить тест по русскому языку тест по русскому языку «местоимение. разряды местоимений» для 6 класса 1. укажите личное местоимение: 1) некто 2) вас 3) ни с кем 4) собой 2. укажите относительное местоимение: 1) кто-либо 2) некоторый 3) кто 4) нам 3. укажите вопросительное местоимение: 1) кем-нибудь 2) кем 3) себе 4) никакой 4. укажите определительное местоимение: 1) наш 2) который 3) некий 4) каждый 5. укажите возвратное местоимение: 1) свой 2) чей 3) сам 4) себя 6. найдите указательное местоимение: 1) твой 2) какой 3) тот 4) их 7. найдите притяжательное местоимение: 1) самый 2) моего 3) иной 4) ничей 8. укажите неопределённое местоимение: 1) весь 2) какой-нибудь 3) любой 4) этот 9. укажите вопросительное местоимение: 1) сколько 2) кое-что 3) она 4) нами 10. в каком варианте ответа выделенное слово является притяжательным местоимением? 1) увидел их 2) её нет дома 3) её тетрадь 4) их не спросили

Информация

Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.