Простые числа

[Verochka]

Помогите решить задачку!Найти все такие простые числа,не превосходящие заданного N,двоичная запись которых представляет собой симметричную последовательность нулей и единиц(начинающуюся единицей).
Нужно программировать на Delphi.

[Arigato]

Что бы проверить простоту числа, достаточно убедиться, что оно не делится ни на одно число, начиная от 2 и до квадратного корня из этого числа.
Затем раскладываете число в двоичное представление и проверяете симметричность 1 и 0.
Программируете все это на Делфи

[Verochka]

Я не знаю как прогроммировать!;-(Вообще мало с этим работала мы в вузе все тупо с книжек списываем,а понимания никакого!Помогите а?Или хотя бы если не сложно,то попросила бы обьяснить немного,хотя бы по этой задаче!ну допустим про простоту я еще напишу че-нить,а вот с двоичной сис-мой будут проблеммы!

[Arigato]

Вообще мало с этим работала мы в вузе все тупо с книжек списываем,а понимания никакого!

Ну так а зачем тогда вообще учиться, проще сразу диплом купить.

ну допустим про простоту я еще напишу че-нить,а вот с двоичной сис-мой будут проблеммы!

Напишите программу, реализующую эту часть задания:

Найти все такие простые числа,не превосходящие заданного N

Далее поможем.

[como]

Сообщение от Verochka

Я не знаю как прогроммировать!;-(Вообще мало с этим работала мы в вузе все тупо с книжек списываем,а понимания никакого!

Самое интересное, что ты хочешь, чтобы тебе здесь написали, а ты тупо списала как в вашем вузе, и понимания опять никакого!

[Verochka]

Или хотя бы если не сложно,то попросила бы обьяснить немного,хотя бы по этой задаче!
Это для тех,кто читает между строк!

[Sibedir]

Как проверить делится ли число на число вы знаете?

[Verochka]

Я не совсем вопрос поняла!это ведь от самих чисел зависит наверное,если я все правильно понимаю!А вообще нужно брать составное число(пусть это будет D-для краткости) и смотреть на какие простые числа делится D(проверяем все простые числа до корня из D)!если D делится на какое-нить число,кроме D и 1,то оно составное,иначе простое!

[DarkAsmodey]

Только проверяй остаток от деления а не что нить еще если равно нулю значит делится иначе нет

[Sibedir]

Ну вот, видите, все можете, если захотите. Итак, имеем два цикла. Первый от 2 до N (по заданию). Для каждого числа этого цикла организуем еще один цикл для проверки, является ли число простым:

for i := 2 to N do begin
  f := True;
  for j := 2 to Round (Sqrt (i)) do begin
    if (i mod j) = 0 then begin
      f := False;
      Break;
    end;

  ...

end;

Теперь, зная является ли число простым, нужно сжелать с ним то, что требуется по заданию. Есть проблемы по симметричности?