Предмет: Информатика, автор: blackvoran75

2. Створити масив і заповнити його 30-ма простими числами (простим є число, яке ділиться на 1 і самого себе)

помогите

Ответы

Автор ответа: iolandavalerypad353
0
function isPrime(num : integer): boolean;
begin
    result := true;
    for var i := 2 to num div 2 do
        if num mod i = 0 then
        begin     
            result := false;     
            break   
        end;
end;

begin 
    var arr := new integer[30]; 
    var (n, i) := (2, 0); 
    while (i < 30) do 
    begin   
        if isPrime(n) then   
        begin     
            arr[ i ] := n;     
            i+=1;   
        end;   
        n+=1; 
    end; 
    arr.Println;
end.
Похожие вопросы
Предмет: ОБЖ, автор: DimaBronsciq
1. Как себя вести при захвате самолета, автобуса, поезда террористами?
а) Выполнять требования террористов, не создавайте конфликтных ситуаций;
б) Спрашивать разрешения на все действия;
в) При штурме самолета группой захвата лечь на пол и не подниматься до конца операции.
2. При захвате террористами общественного здания, в котором вы находились вместе с другими гражданами, необходимо соблюдать нижеперечисленные правила безопасного поведения. Какие из них является ошибочным?
а) не пытайтесь самостоятельно обезвредить террористов, не вступайте с ними в споры, выполняйте все их требования;
б) старайтесь не привлекать к себе их внимания, спрячьтесь куда-нибудь, не делайте лишних, резких и подозрительных движений;
в) если освобождают часть заложников, детей и больных, старайтесь попасть в их число;
г) воспользуйтесь мобильным телефоном, чтобы сообщить о своем местонахождении.
3. Что вы станете делать при штурме здания группой захвата?
а) попытаюсь помочь группе захвата;
б) с началом штурма выбегу из здания в сторону расположения специального подразделения; в) лягу на пол, прикрою голову руками и не стану подниматься до конца операции;
г) перебегу в другое помещение.
4. В захваченном террористами транспортном средстве:
а) оставайтесь на своем месте;
б) не перемещайтесь по салону;
в) переместиться ближе к водителю;
г) старайтесь меньше привлекать к себе внимание преступников;
д) вступить в диалог с преступниками, высказать претензии.
5. В случае силового освобождения заложников (при штурме спецподразделения):
а) попытайтесь укрыться за предметами (кресло, стол и другие предметы мебели);
б) прикрыть свое тело от пуль подручными средствами;
в) прикрыться другими заложниками, смешавшись с ними;
г) выйти на видное место, чтобы спецназ видел вас;
д) попытайтесь отойти от входных дверей, окон, люков и занять горизонтальное положение.
6. В момент штурма спецподразделениями:
а) уступить своё место бандитам среди заложников;
б) не брать в руки оружие преступников;
в) не позволять бандитам занять место среди заложников;
г) по возможности взять в руки оружие убитого преступника и помочь спецназу;
д) громко кричать, указывая спецназу на бандитов, чтобы помочь их распознать.
7. С какой целью людей берут в заложники?
а) показать окружающим кто круче;
б) по религиозным или национальным мотивам;
в) чтобы прославиться в средствах массовой информации и заявить о себе;
г) чтобы получить выкуп;
д) по политическим мотивам.