Регистрация
egorkozlovcev
12.01.2020 14:24
Информатика
Есть ответ 👍

Дано целое число x, найти первое простое число,которое больше числа x. для решения составить логическую функцию, которая проверяет является ли данное число простым.

198
230
Посмотреть ответы 2

Ответы на вопрос:

ksjsksskskjns
ksjsksskskjns
4,8(71 оценок)

var

i: integer;

begin

readln(i);

  if (i mod 2< > 0) and (i mod 3< > 0) and (i mod 5< > 0) and (i mod 7< > 0) then

  begin

    writeln('простое! ');

    end

  else

    begin

    writeln('нет! ');

    end;

end.

Uglyhikka
Uglyhikka
4,8(25 оценок)
Ответ под номером 4, если надо было выразить в килобайтах.

Популярно: Информатика