0 / 0 / 3
Регистрация: 13.11.2012
Сообщений: 61
1

Из множества целых чисел [1.100] выделить множество простых чисел;

02.04.2013, 00:12. Показов 1262. Ответов 5
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Из множества целых чисел [1..100] выделить следующие множества: множество простых чисел;
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
02.04.2013, 00:12
Ответы с готовыми решениями:

Из множества целых чисел 1.10 выделить множество чисел, на которые делится без остатка число 7. Вывести это множество на экран
Из множества целых чисел 1..10 выделить множество чисел, на которые делится без остатка число 7....

Из заданного множества целых чисел выделить множество нечётных чисел и чисел, делящихся без остатка на 17
Дано множество Xl,содержащее целые числа из диапазона . Сформировать новое множество Y путем...

Из множества целых чисел 1..20 выделить: множество чисел, делящихся без остатка на 6;
Из множества целых чисел 1..20 выделить: множество чисел, делящихся без остатка на 6;

Из множества целых чисел 1..20 выделить: множество чисел, делящихся без остатка на 6
Из множества целых чисел 1..20 выделить: множество чисел, делящихся без остатка на 6;

5
Модератор
9599 / 4922 / 3247
Регистрация: 17.08.2012
Сообщений: 15,363
02.04.2013, 00:27 2
Алгоритм определения простоты числа можно взять вот из этой темы, пост MB_worst от 28.03.2013, 12:47.

Успехов.
0
0 / 0 / 3
Регистрация: 13.11.2012
Сообщений: 61
11.04.2013, 14:45  [ТС] 3
Цитата Сообщение от zwenya Посмотреть сообщение
Из множества целых чисел [1..100] выделить следующие множества: множество простых чисел;
напишите, пожалуйста, программу, если не трудно
0
Модератор
9599 / 4922 / 3247
Регистрация: 17.08.2012
Сообщений: 15,363
13.04.2013, 00:44 4
Мне хочется знать, а... Вам, самому... это написать лень или неинтересно? Мне, конечно, нетрудно пять строчек дописать к вышеуказанному коду. Так, например:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
program Project1;
 
uses crt;
 
function simple(N: integer): boolean;
var i: integer;
begin
if n < 2 
  then Result := False
  else begin
    Result := True;
    for i:=2 to trunc(sqrt(N)) do 
    if N mod i = 0
      then begin
        Result := False;
        exit;
      end;
  end;
end;
 
var i: integer;
 
begin
writeln('Simple numbers [1..100]:');
for i := 1 to 100 do if simple(i) then write(i, ' ');
readln;
end.
Или нужно через переменные типа множества?
1
233 / 215 / 63
Регистрация: 01.09.2012
Сообщений: 2,103
13.04.2013, 10:54 5
Cyborg Drone, поиск для тупых, а умные предпочитают халяву. Я лично не брезгую поиском...
0
Cyborg Drone
14.04.2013, 21:03     Из множества целых чисел [1.100] выделить множество простых чисел;
  #6

Не по теме:

Кто ни во что не вникает, будет хорошо жить, но ничего не знать... Но... Разве это жизнь?

0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
14.04.2013, 21:03

Множества.Из множества целых чисел получить множество чисел, являющихся квадратами нечетных чисел
Из множества целых чисел получить множество чисел, являющихся квадратами нечетных чисел и...

Из множества целых чисел 1..20 выделить: множество чисел, делящихся на 6 без остатка; множество чисел делящихся без остатка на 2 или на 3
Из множества целых чисел 1..20 выделить: множество чисел, делящихся на 6 без остатка; множество...

Из множества целых чисел получить множество чисел, являющихся квадратами четных чисел
Из множества целых чисел получить множество чисел, являющихся квадратами четных чисел и вывести их...

Множество: выделить множество чисел, являющихся квадратами целых чисел
Из множества чисел 1..100 выделить множество чисел, являющихся,в свою очередь, квадратами целых...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru