Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 23.10.2011, 16:10   #1
dearkato
Пользователь
 
Регистрация: 15.10.2011
Сообщений: 29
По умолчанию составить алгоритм

вывести все простые числа Р в указанном интервале (А,В). используя простейшие функции.

Последний раз редактировалось dearkato; 23.10.2011 в 18:06.
dearkato вне форума Ответить с цитированием
Старый 23.10.2011, 17:55   #2
Muaxaxa
Пользователь
 
Регистрация: 22.10.2011
Сообщений: 19
По умолчанию

1. Сначала блок-схема потом программа.
2. В чем заклучается просьба?
Muaxaxa вне форума Ответить с цитированием
Старый 23.10.2011, 18:05   #3
dearkato
Пользователь
 
Регистрация: 15.10.2011
Сообщений: 29
По умолчанию

Цитата:
Сообщение от Muaxaxa Посмотреть сообщение
1. Сначала блок-схема потом программа.
2. В чем заклучается просьба?
написать программу используя простейшие функции. блок-схему сама нарисую
dearkato вне форума Ответить с цитированием
Старый 23.10.2011, 18:09   #4
Muaxaxa
Пользователь
 
Регистрация: 22.10.2011
Сообщений: 19
По умолчанию

А язык какой?
И.. Какой в этом смысл, если за Тебя сделают?
Muaxaxa вне форума Ответить с цитированием
Старый 23.10.2011, 18:23   #5
dearkato
Пользователь
 
Регистрация: 15.10.2011
Сообщений: 29
По умолчанию

Цитата:
Сообщение от Muaxaxa Посмотреть сообщение
А язык какой?
И.. Какой в этом смысл, если за Тебя сделают?
язык дельфи или паскаль. мне разницы в них никакой нет. оба понимаю. я хочу просто как-нибудь попроще программку записать, я ее написала, но с использованием сложных функций и эт не оч удобно. нужно что-нить покороче...
dearkato вне форума Ответить с цитированием
Старый 23.10.2011, 19:49   #6
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,229
По умолчанию

алгорит тут простой как топор.
цикл по всем целым числам от A до B
каждое число проверять на простоту. Если простое - выводить.
вот и всё.
Код:
function isPrime(X: longint): boolean;
var i:longint;
Begin
     isPrime:=false;
     if x<2 then Exit;
     if not odd(x) and (x<>2) { проверяем на чётность  }
          then exit;
     i:=3;
     while i <= sqrt(x) do { проверяем только нечётные }
     begin
          if x mod i = 0 then Exit;
          inc(i,2);
     end;
     isPrime:=true;
End;
var i, A, B : longint;
begin
  Readln(A,B);
  for i:=A to B do
   if isPrime(i) then WriteLn(i);
  
  readln;
end.

Последний раз редактировалось Serge_Bliznykov; 23.10.2011 в 19:51.
Serge_Bliznykov вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Составить алгоритм Maxim_aka47 Помощь студентам 4 12.10.2011 19:08
составить алгоритм michal3003 Помощь студентам 0 19.05.2011 17:16
Составить алгоритм Vikenty Помощь студентам 3 27.05.2010 22:32
Составить алгоритм и программу vOvA vO Помощь студентам 3 19.05.2010 07:58
Помогите составить алгоритм! alex_8 Помощь студентам 3 18.10.2009 16:50