Помогите по Паскалю. - есть ответ

-1

Дана задача:
Используя цикл и датчик случайных чисел,получить 15 любых чисел.
Определить количество чисел,которые больше 0.5 и меньше.
Я понимаю,как составить программу в целом,но помогите пожалуйста,что надо ввести,чтобы найти количество.
Может я просто туплю=( Заранее спасибо.

Примечание:
Не равное 0.5. Я сама не врубаюсь до конца в условие. Ну как сказала училка...С её слов...

Ответы:

_lex_

В чём конкретно проблема?

Postan Grayhole

вообще тут нужна проверка после того, как запомнили текущее число в цикле, но непонятно условие. больше и меньше 0.5? т.е. не равное 0.5, или как?

Энтузиаст начинающий

Колличество случайных чисел больших 0.5? Если я неправильно понял портачьте а так вот
For i:=1 to 15 do
Begin
Randomize
A[I]:=random(1,100например);
If a[I]>0.5 then Inc(menthe) else Inc(bolshe);
End
Write(menthe,bolshe);
Неуверен с чассьью про рандом а так все правильно

13 лет назад

RPI.su - самая большая русскоязычная база вопросов и ответов. Наш проект был реализован как продолжение популярного сервиса otvety.google.ru, который был закрыт и удален 30 апреля 2015 года. Мы решили воскресить полезный сервис Ответы Гугл, чтобы любой человек смог публично узнать ответ на свой вопрос у интернет сообщества.

Все вопросы, добавленные на сайт ответов Google, мы скопировали и сохранили здесь. Имена старых пользователей также отображены в том виде, в котором они существовали ранее. Только нужно заново пройти регистрацию, чтобы иметь возможность задавать вопросы, или отвечать другим.

Чтобы связаться с нами по любому вопросу О САЙТЕ (реклама, сотрудничество, отзыв о сервисе), пишите на почту [email protected]. Только все общие вопросы размещайте на сайте, на них ответ по почте не предоставляется.