1. Информатика
  2. Напишите программу на языке

Напишите программу на языке паскаль. определить, является ли число, введённое с клавиатуры простым.

alanada1 alanada1    3   04.05.2019 13:38    0

Ответы
iliabalagansky iliabalagansky  09.06.2020 09:16

var n, i: integer;

begin

   write('Введите число: ');

   readln(n);

   i:=2;

   while n mod i <> 0 do

       i += 1;

   if i = n then

       writeln('Простое')

   else

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

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Veronika509 Veronika509  14.01.2021 17:00
Дайте определение следующим теоремам. ПРОГРАМНОЕ ОБЕСПИЧЕНИЕоперационная система.архиватор.антивирусная программа. камуникационая программа.система програмирования.текстовый...
sennik41 sennik41  19.08.2019 14:00
Вэлектронной таблице значение формулы =сумм(c3: e3) равно 15. чему равно значение формулы =срзнач(c3: f3), если значение ячейки f3 равно 5? 1) 20 2) 10 3) 5 4) 4...
36kot361 36kot361  19.08.2019 14:00
Объясните. я нахожусь в дома, дом находится на улице, улица находится в городе, город находится в стране, страна находится на континенте, континент находится в космосе,...
Віка34566 Віка34566  19.08.2019 14:00
Перечислите достоинства и недостатки хранения информации во внутренней и внешней памяти....
bestgad bestgad  19.12.2021 16:31
Что написано на бумаге, которую серый и чёрный коты показывают Котилио ?...
ПростоПомогитеПлез ПростоПомогитеПлез  19.12.2021 16:50
написать программу для робота в питоне...
умныйчеловеккслюблю умныйчеловеккслюблю  06.04.2019 19:13
Шарящие в паскале, , решить . задан одномерный массив, заполненный случайными числами: 1)определить среднее модулей минимального и максимального значений. 2)написать подпрограмму,...
Tima908 Tima908  29.09.2020 11:25
Выберите истинные высказывания: 1.При имитационном моделировании проводятся опыты с компьютерными моделями2.При имитационном моделировании проводятся натурные испытания...
milashka44 milashka44  29.09.2020 11:25
У меня на телефоне стоит родительский контроль, и приходят уведомления когда.я хочу что то скачать. Я могу отправить запрос на скачивание, но его могут не заметить. У меня...
killskorpion19 killskorpion19  29.09.2019 20:50
Период обращения юпитера вокруг солнца составляет 11,86 лет. как относится сила солнечного тяготения, действующая на землю и юпитер?...

Популярные вопросы