Главная » Студентам, Учителям, Фракталенок, Школьникам

Поиск простых чисел

17 января 2016 11 коммент.

Нижеприведенная программа написана для PascalABC и должна находить все простые числа от 1 до 100, но работает не верно. Кто найдет ошибку?

program shtaa2;
uses crt;
var i, x, k: integer;
begin
writeln(2);
writeln(3);
for x:= 4 to 100 do
begin
for i:= 2 to x-1 do
if x mod i = 0
then
k:=k+1;
if k = 0 then writeln (x)
end;
end.

11 коммент. »

  • pammCum пишет:

    Здравствуйте Уважаемый владелец сайта gcg-studio.ru

    Уведомляем Вас, что до Нового Года осталось Всего несколько недель!
    Новый год – это праздник добра, мечты, новой жизни, а также,
    это время больших продаж и высоких прибылей.

    По статистике портала Яндекс.Маркет, в ноябре, уровень продаж и заказов
    в Российском сегменте интернет-магазинов и сайтов-услуг, вырос на 30 %
    по сравнению с октябрем.

    Мы надеемся что Вы отметили данный рост на своем сайте.
    Если нет, значит Вашему сайту, трагически не хватает рекламы.

    Для тех кто хочет срочно прорекламировать свой сайт,
    С 20 ноября по 3 декабря мы проводим акцию низких цен!

    Всего за 500 рублей, Вы получите
    1. ссылки с 500 сайтов
    2. более 2500 объявлений на форумах

    Не упустите свой шанс!!!

    Подробнее об акции читайте здесь:

    red222.ru/14900.htm

    Цитировать
  • pamomCum пишет:

    Здравствуйте Уважаемый владелец сайта gcg-studio.ru

    Предупрежденаем Вас, что Новый Год не за горами!
    Новогодний ажиотаж уже начался.

    По статистике от Яндекс.Маркет, за прошедшую неделю уровень продаж и заказов
    в Российском сегменте интернет-магазинов и сайтов-услуг, снова вырос, аж на на 8 %
    по сравнению с позапрошлой неделей.

    А на Вашему сайте по-прежнему тишина и покой?
    Если да, то срочно заказывайте рекламу.

    Для тех кто хочет дешево прорекламировать свой сайт,

    С 20 ноября по 3 декабря мы проводим акцию низких цен!

    До конца акции от нашего сайта осталось Всего 7 дней!

    Всего за 500 рублей, Вы получите
    1. ссылки с 500 сайтов
    2. более 2500 объявлений на форумах

    Не упустите свой шанс!!!

    Подробнее об акции читайте здесь:

    red222.ru/14900.htm

    Цитировать
  • MargieLayen пишет:

    Здравствуйте Уважаемый владелец сайта gcg-studio.ru

    В 2015 году, Яндекс официально объявил войну платным ссылкам.

    За 2016 год, более 100 000 сайтов попали под санкции Яндекса за

    приобретение ссылок на биржах. Именно на БИРЖАХ!!!

    Вы все ещё покупаете ссылки на бирже? — Тогда Яндекс идет к Вам!

    Как избежать проблем и защитить сайт, читайте здесь:

    red222.ru/14700.htm

    Цитировать
  • ammyPousa пишет:

    Здравствуйте Уважаемый владелец сайта gcg-studio.ru

    9 декабря Яндекс обновил поисковую выдачу.
    После обновления, из поиска Яндекса было удалено более 5000 сайтов,
    за использование покупных ссылок.

    Скорее всего это «большая чистка» и до Нового Года, Яндекс «Накажет»
    еще несколько тысяч сайтов.

    Советуем проверить Ваш сайта на наличие
    в поисковой выдаче Яндекса.

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

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

    Ссылки с форумов Вы можете заказать у нас.
    Оплата производится только После выполнения заказа.
    Мы работаем с февраля 2017 Года и более 1000 человек уже выбрали
    нас для продвижения.

    Не рискуйте Здоровьем Вашего сайта и постарайтесь как можно быстрее
    разбавить его Ссылочный профиль, ссылками с форумов.

    Как избежать проблем и защитить сайт, читайте здесь:

    red222.ru/14700.htm

    Цитировать
  • riciaSassy пишет:

    Здравствуйте Уважаемый владелец сайта

    Как мы и предсказывали, Яндекс продолжил «большую чистку»

    17 декабря Яндекс обновил поисковую выдачу и удалил из нее еще 4300 сайтов,
    за использование покупных ссылок.

    Думаем до Нового Года, из Выдачи исчезнет ещё несколько тысяч сайтов,
    продвигаемых с помощью ссылок купленных на биржах.

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

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

    Ссылки с форумов Вы можете заказать у нас.
    Оплата производится только После выполнения заказа.
    Мы работаем с февраля 2017 Года и более 1000 человек уже выбрали
    нас для продвижения.

    Не рискуйте Здоровьем Вашего сайта и постарайтесь как можно быстрее
    разбавить его Ссылочный профиль, ссылками с форумов.

    Как избежать проблем и защитить сайт, читайте здесь:

    red222.ru/14700.htm

    Цитировать
  • eressLab пишет:

    Здравствуйте.

    Данное извещение направлено Вам, в связи с тем, что на
    вашем сайте выявлены серьезные недостатки.

    Наверняка Вы заметили, что уже длительное время не можете продвинуть,
    раскрутить свой сайте. Данная стогнация напрямую связана с хронической
    недостаточностью входящих ссылок ведущих на Ваш сайте.

    Чтобы Ваш сайте сдвинулся с места и начал рости в поисковой выдаче,
    Советуем заказать размещение ссылок на форумах, т.к. именно ссылки
    на форумах являются наиболее естественными с точки зрения поисковых систем.

    Если Вы закупаете ссылки на биржах, Рекомендуем Разбавить Ваш Ссылочный
    профиль ссылками с форумов. Это защитить вашем сайте от бана за покупные ссылки.

    Ссылки с форумов Вы можете заказать у нас.

    Оплата производится только После выполнения заказа,
    что полностью исключает возможность обмана.

    Не откладывайте покупку ссылок «На потом», т.к. После «Нового Года» возможно
    значительное повышение цен.

    Подробности здесь:

    red222.ru/14700.htm

    Цитировать
  • ElvaMgp пишет:

    апрапрапр

    Цитировать
  • NuSlUnfat пишет:

    Mobileyell — это кладезь для тех, кто ценит новости и развлечения. На нашем сайте вы увидите юмор, комиксы, головоломки, приколы, анекдоты, картинки, где нужно найти отличия видео, новые клипы, фото, обои, видеоигры и еще много всего занятного.
    Mobileyell – территория, где вас ожидают развлечения, смех и отдых.
    На этом сайте любой найдет для себя что-то веселое.
    Лучшая музыка, кино, любовь, отношения, животные, афиша, фото онлайн, красивые обои на рабочий стол, постоянно пополняемые на сайте заценит мужчина и женщина.
    Те, кого интересует музыка бесплатно, песни могут на этом портале скачать музыку 2017, слушать музыку онлайн бесплатно, хиты слушать онлайн, новое слушать онлайн, радио онлайн слушать бесплатно. Если уж говорить о радио, то больше всего наши посетители любят русское онлайн слушать бесплатно и европа плюс слушать онлайн. Заметим, у нас, представлены как давно полюбившиеся всем хиты, так и новинки музыки 2017. Если же вам больше нравится музыка прошлых годов, попробуйте музыку 90 х слушать онлайн, или же 80 слушать онлайн. Наш ассортимент настолько широк, что здесь можно шансон слушать онлайн, аудиокниги слушать онлайн и даже слушать онлайн детские песни и программы. У нас можно все песни слушать онлайн бесплатно и без регистрации.
    Отныне каждый слушающий музыку онлайн меломан, знает, что музыка онлайн бесплатно, музыка скачать бесплатно новинки – это Mobileyell.
    Любители музыки также часто хотят скачать клипы 2017, смотреть клипы новинки, смотреть русские клипы или слушать клипы. Нередко ищут клипы видео, клипы 2017 новинки, русские клипы, зарубежные клипы, порно клипы, клипы 2016, клипы подряд, клип года.
    Любители смотреть онлайн видео, а также фильмы и сериалы также будут рады контенту Mobileyell. У нас вы можете смотреть онлайн бесплатно в качестве, смотреть фильмы онлайн, сериал сезон смотреть онлайн, смотреть онлайн русское, эфир смотреть онлайн.
    Заходите на Mobileyell скачать видео, смотреть видео онлайн, ютуб видео смотреть, более того с нашей помощью можно даже своими руками видео сделать. На этом портале представлено видео про все на свете, русское видео, видео 2017, домашнее видео, видео майнкрафт, видео песни, видео года, голые видео, видео для детей, видео женщин, видео уроки, youtube видео,видео голы, эротика видео, видео как сделать своими руками различные вещи (в частности показана поклейка обоев). К тому же, новые видео появляются очень часто.
    Кроме того, развлекательный портал Mobileyell имеет широчайший ассортимент различных фото. Вы найдете фото года, фото женщин, домашнее фото, фото руки, фото волос, фото дети, фото дизайн, торты фото, грибы фото. Хозяйки будут рады увидеть рецепты с фото. Скачать фото бесплатно можно абсолютно любое.
    Но не каждое фото подойдет как обои на рабочий стол или обои на андроид, для этого есть специальный раздел на портале. Там вы сможете скачать обои на стол. Заметим, каталог обоев отличается невероятным разнообразием. Тут вам и живые обои, и обои девушки, и обои Украина, обои осень, обои минск, обои интернет. Где скачать красивые обои на стол бесплатно – такой вопрос больше не стоит, ведь для этого есть Mobileyell. Остается только решить, какие обои вы хотите.
    Сайт мобильных удовольствий MobileYell.Info: клипы 2017

    Цитировать
  • eressLab пишет:

    Здравствуйте Уважаемый Администратор Сайта.

    Сообщаем Вам, что Новогодние праздники позади, с чем Вас и поздравляем.
    Надеемся, что прошлый Года был для Вас таким же успешным, как и для всех
    наших клиентов.

    В 2017 году, среднегодовой рости ТИЦ у наших клиентов, составил 47.6

    Если У Вашего Сайта, за прошедший Год, ТИЦ не Вырос, или Вырос незначительно,
    советуем заказать у нас размещение ссылок на форумах, т.к. именно ссылки
    на форумах являются наиболее естественными с точки зрения поисковых систем и
    способствуют поднятию Индекса Цитирования Сайта.

    Если Вы закупаете ссылки на биржах, Рекомендуем Разбавить Ваш Ссылочный
    профиль ссылками с форумов. Это защитить вашем сайте от бана за покупные ссылки.

    Ссылки с форумов Вы можете заказать у нас.

    Именно благодаря Нашим ссылками, Дональд Трамп, стал президентом США!

    Наши цены:

    500 ссылок с профилей и топиков — 500 рублей
    1000 ссылок с профилей и топиков — 750 рублей
    1500 ссылок с профилей и топиков — 1150 рублей
    2000 ссылок с профилей и топиков — 1500 рублей

    Оплата производится только После выполнения заказа,
    что полностью исключает возможность обмана.

    Наши консультанты — Владимир, Мария и Александра,
    всегда ответят на ваши вопросы

    Подробности здесь:

    red222.ru/14700.htm

    Цитировать
  • ancyStait пишет:

    Здравствуйте Уважаемый Администратор Сайта.

    Предлагаем раскрутку Сайта с помощью ссылок.

    Наши цены:

    500 ссылок с профилей и топиков — 500 рублей
    Количество сайтов с размещенными ссылками : 500+
    Типы ссылок : анкорные/безанкорные (примерно 50/50)
    Место размещения : профили + топики на форумах
    Срок выполнения заказа : до 7 дней включительно
    Максимально возможный рост ТИЦ : +10
    Оплата после выполнения
    Цена : 500 рублей
    ___

    1000 ссылок с профилей и топиков — 750 рублей
    Количество сайтов с размещенными ссылками : 1000+
    Типы ссылок : анкорные/безанкорные (примерно 50/50)
    Место размещения : профили + топики на форумах
    Срок выполнения заказа : до 7 дней включительно
    Максимально возможный рост ТИЦ : +30
    Оплата после выполнения
    Цена : 750 рублей
    ___

    1500 ссылок с профилей и топиков — 1150 рублей
    Количество сайтов с размещенными ссылками : 1500+
    Типы ссылок : анкорные/безанкорные (примерно 50/50)
    Место размещения : профили + топики на форумах
    Срок выполнения заказа : до 7 дней включительно
    Максимально возможный рост ТИЦ : +50
    Оплата после выполнения
    Цена : 1150 рублей
    ___

    2000 ссылок с профилей и топиков — 1500 рублей
    Количество сайтов с размещенными ссылками : 2000+
    Типы ссылок : анкорные/безанкорные (примерно 50/50)
    Место размещения : профили + топики на форумах
    Срок выполнения заказа : до 7 дней включительно
    Максимально возможный рост ТИЦ : +70
    Оплата после выполнения
    Цена : 1500 рублей

    Наши консультанты — Владимир, Мария и Александра,
    всегда ответят на ваши вопросы

    Подробности здесь:

    red222.ru/14700.htm

    Цитировать
  • JayneReild пишет:

    Здравствуйте Уважаемый Администратор Сайта.

    Предлагаем раскрутку Сайта с помощью ссылок.

    Наши цены:

    500 ссылок с профилей и топиков — 500 рублей
    Количество сайтов с размещенными ссылками : 500+
    Типы ссылок : анкорные/безанкорные (примерно 50/50)
    Место размещения : профили + топики на форумах
    Срок выполнения заказа : до 7 дней включительно
    Максимально возможный рост ТИЦ : +10
    Оплата после выполнения
    Цена : 500 рублей
    ___

    1000 ссылок с профилей и топиков — 750 рублей
    Количество сайтов с размещенными ссылками : 1000+
    Типы ссылок : анкорные/безанкорные (примерно 50/50)
    Место размещения : профили + топики на форумах
    Срок выполнения заказа : до 7 дней включительно
    Максимально возможный рост ТИЦ : +30
    Оплата после выполнения
    Цена : 750 рублей
    ___

    1500 ссылок с профилей и топиков — 1150 рублей
    Количество сайтов с размещенными ссылками : 1500+
    Типы ссылок : анкорные/безанкорные (примерно 50/50)
    Место размещения : профили + топики на форумах
    Срок выполнения заказа : до 7 дней включительно
    Максимально возможный рост ТИЦ : +50
    Оплата после выполнения
    Цена : 1150 рублей
    ___

    2000 ссылок с профилей и топиков — 1500 рублей
    Количество сайтов с размещенными ссылками : 2000+
    Типы ссылок : анкорные/безанкорные (примерно 50/50)
    Место размещения : профили + топики на форумах
    Срок выполнения заказа : до 7 дней включительно
    Максимально возможный рост ТИЦ : +70
    Оплата после выполнения
    Цена : 1500 рублей

    Наши консультанты — Владимир, Мария и Александра,
    всегда ответят на ваши вопросы

    Подробности здесь:

    red222.ru/14700.htm

    Цитировать

Оставить комментарий или два

Вы можете подписаться на комментарии по RSS.