ВХОД

МЕТОДИЧЕСКИЕ РАЗРАБОТКИ ПО КУРСУ ИНФОРМАТИКИ

"ПРОГРАММИРОВАНИЕ НА ЯЗЫКЕ PASCAL"

Начало > Глава II. Простые числа

ГЛАВА II

АЛГОРИТМ

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

Алгоритм основан на том, что у простого числа всегда 2 делителя: 1 и само число

kd:=0;{количество делителей числа};

For del:=1 to ch do {проверяются все числа от 1 до самого числа}
    if ch mod del=0 then inc(kd);{если число делится на del без остатка, то del является делителем}

If kd=2 then... {Если количество делителей равно 2, то число простое и с ним производятся действия, требуемые в задаче}
    Writeln(ch,' простое');
    Sch:=Sch+ch; {Сумма простых чисел, можно здесь использовать оператор inc(Sch,ch)}
    Pch:= Pch +ch; {Произведение простых чисел}
    Inc(kch); {Количество простых чисел}
    {и др.}

end;

 

 

 

 

 

 

Copyright ©2011 Nika A.S.
Hosted by uCoz