1. Информатика
  2. Написать программу Pascal. Найти

Написать программу Pascal. Найти простые числа х и у, которые в произведении дают число z, типа longint.

voborocha voborocha    1   23.12.2021 04:53    0

Ответы
DenGamer11 DenGamer11  23.12.2021 06:00

число Z вводится

Pascal

var

 i, z: longint;

begin

 write('Введите Z : ');

 readln(z);

 for i:=1 to trunc(sqrt(z)) do begin

   if z mod i = 0 then

     writeln(i, ' * ', z/i);

 end;  

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
hdjdhb hdjdhb  15.06.2020 21:30
Написать программу на С++, определяющую класс IP адреса (IPv4) IP адрес вводится с клавиатуры в стандартном формате (127.0.0.1). Программа должна распознать адрес и...
lenapanfilova0 lenapanfilova0  15.06.2020 21:27
С Дельта – кода Элиаса зашифровать числа. Найти: L, M, M-1, Результат....
batrazmargit batrazmargit  15.06.2020 21:26
1. Получить численное решение уравнения Мальтуса с шагом 0.1 мс методом Эйлера. Вывести табличные значения, построить график изменения численности популяции во времени....
vika111192 vika111192  15.06.2020 21:26
2.. Заполнить таблицу необходимыми данными и построить график, отражающий разницу между фактическими поставками и запросами потребителей. Город Потребности Поставки...
Filka7 Filka7  15.06.2020 21:26
Контрольная по информатике...
KristaYu KristaYu  15.06.2020 21:24
Здравствуйте Задание 9! с точными объяснениями!)...
Dgukpd Dgukpd  15.06.2020 21:22
Упорядочить каждую строку матрицы по возрастанию и удалить последний столбец. Массив размером МхN, элементы которого задаются датчиком случайных чисел на интервале [-7;26]....
юля2716 юля2716  27.09.2019 00:20
Решить 10. применяя законы логики, максимально логическое выражение ¬(b ∨a) ∧(b ∧¬a)....
inkognit1234567 inkognit1234567  27.09.2019 00:20
Напишите на любом известном вам языке программирования программу, которая находит минимальное значение в массиве из n (n = 100) натуральных чисел. программа должна считывать...
стася106 стася106  27.09.2019 00:20
Решить, ! 63389 из десятеричной перевести в шестнадцатеричную. (типа 10 внизу). информатика....

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