Статистика
Всего в нашей базе более 4 327 657 вопросов и 6 445 963 ответов!

В паскале сделать используя циклы: Ввести число и определить является ли оно простым (если его делители являются 1 и само число)

10-11 класс

Luisdomon 07 апр. 2017 г., 10:31:57 (6 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Gala20
07 апр. 2017 г., 11:20:36 (6 лет назад)

program xxx;

var k, d, n : integer;

      pr : boolean;

begin

  writeln('Введите число k=');

  readln(k);

  d:=2;

  n:= k div 2;

  pr:=false;

  while (d<=n) and not(pr) do

     if k mod d = o then pr:=true else d:=d+1;

  if pr then writeln (k, '- число не простое') else writeln (k, '- число простое');

   readln

end.

 

Ответить

Другие вопросы из категории

В одном районе, в

одном доме, даже в одном подъезде живут учителя Климов, Михеенко, Ушаков,
Жебин. Один из них учитель математики, другой – информатики, третий –
рисования, а четвертый – музыки. Известно, что: ни Климов, ни Ушаков не умеют
играть ни на одном музыкальном инструменте; Ушаков не знаком с Климовым;
учителя рисования и информатики в воскресенье уезжают на дачу к Михеенко; Жебин
попросил учителя рисования написать картины с его изображением и изображением
Климова. Отметь вариант, в котором верно указано, кто есть кто.







Читайте также

4 задачи: ввести натуральное число и определить, верно ли, что сумма цифр равна 10 (через repeat и until)//// ввести натуральное

число и определить, какие цифры встречаются несколько раз (через repeat и until)///

ввести целое число и найти сумму его цифр (через while)

ввести целое число и определить , верно ли, что в его записи есть две одинаковые цифры(через while)

всё через паскаль абс

Из 16-ти чисел, спросите у пользователя ,сколько нужно проанализировать чисел, а затем запросите эти числа и сделайте для каждого вывод, является ли

оно четным или отрицательным.(Паскаль)

Или так: Из 16 -ти чисел,сделайте для каждого вывод,является ли оно четным или отрицательным .(Паскаль)

Помогите пожалуйста,оченьььь срочно надо!Буду благодарна за решение ,спасибо!!!!!!!

Плиз помогите с информатикой( в башке заело) ( здесь нужно использовать циклы for while или repeat);заранее спасибо)

1)Натуральное число n называется простым если оно делится только на 1 и на само себя.по соглашению 1 не считают простым числом. Проверить является ли n простым числом

2)Найдите и выведите на экран все трехзначные числа кратные 3, сумма цифр которых больше суммы цифр частного от деления их на 3

Помогите пожалуйста сделать!!!! В пасккале! 1.Ввести любую букву определить гласная или нет

2.Ввести число . определить четное или не



Вы находитесь на странице вопроса "В паскале сделать используя циклы: Ввести число и определить является ли оно простым (если его делители являются 1 и само число)", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.