tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
найдите самый маленький
найдите самый маленький натуральный делитель числа x, отличный от 1 (2 < = x < = 30000). входные данные вводится натуральное число x. выходные данные выведите наименьший делитель числа x, отличный от 1. примеры входные данные 2 выходные данные
vladugan
1 15.07.2019 14:30
3
Ответы
777ppp777
03.10.2020 04:52
Var x:integer;
begin
readln(x);
for var i:=2 to x do
if (x mod i)=0 then begin
writeln('delitel: ',i);
exit;
end;
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
212629
19.12.2020 21:46
Какой алгоритм следует использовать для создания рисунка с повторяющимся узором?...
Поглит
19.12.2020 21:46
Звездный треугольник Напишите программу, которая выводит указанный треугольник, состоящий из звездочек (*).Sample Input:Sample Output:* ** *** Напишите программу. Тестируется через...
2281337xD
19.12.2020 21:44
Большой мотор EV3 является более мощным, чем средний мотор EV3. Это происходит за счет наличия в большом моторе EV3 редуктора. Редуктор является набором шестеренок и позволяет...
chikist2
26.04.2020 13:25
ИНФОРМАТИКА, ПАСКАЛЬ, Составить программу, по которой на экране будет напечатано: «Числа равны (numbers are equal)», если все три заданных числа равны, в противном случае будет...
Do1git
26.04.2020 13:26
Из передачи “Здоровье” Аня узнала, что рекомендуется спать хотя бы 7 часов в сутки, но пересыпать тоже вредно и не стоит спать более 9 часов. Сейчас Аня спит h часов в сутки. Если...
Kristina238485
26.04.2020 13:26
Складіть блок-схему алгоритму обчислення суми натуральних чисел, які не перевищують заданого додатного числа 8. Виконайте складений алгоритм для трьох різних значень а....
polina1362
27.07.2019 19:30
Написать программу нахождения наименьшей суммы двух соседних элементов массива...
temnikovay01
29.01.2022 19:58
Складіть програму Правила дорожнього руху, у якій можна визначити, чи не порушив правила дорожнього руху водій, що проїхав відстань S за час і, якщо на шляху встановлено одне із...
13alla68
29.01.2022 19:59
Какие примеры вы можете привести к while циклу?....
Aleksey311
29.01.2022 20:06
Как перенести папку с двоичным кодом в предложение ?...
Популярные вопросы
здесь нужно правильно поставить,смотрите фото...
2
Яку роль зіграв дід Генрик у житті Буби? («Буба» Барбара Космовська) 20б....
2
CuO + H2 = Cu + H2O Электронный баланс...
2
Put the verbs in brackets into the Future Simple, Present Continious or use...
3
Сложиту уравнения реакций ферум(III) оксиду с водородом и карбон(II) оксидом....
3
5/6(6x-12)=-3(x+2) это дробь ТОК НОРМАЛЬНО...
3
ВЫПОЛНЕНИЕ: 12:47ТЕКСТ ЗАДАНИЯВыполните действия: ЗАГРУЗКА ФАЙЛОВСОР...
2
1. Члени речення, які відносяться до одного й того самого члена речення й відповідають...
1
Мәтінді оқып, шылауларды теріп жаз. Төменде берілген сұрақтарға жауап жаз. Шылаулар:...
3
Paul I m reading a book about gangster, переделать из прямого языка в непрямой...
2
begin
readln(x);
for var i:=2 to x do
if (x mod i)=0 then begin
writeln('delitel: ',i);
exit;
end;
end.