составьте программу, выводящую на экран все делители числа x. число x введите с клавиатуры.
10-11 класс
|
очень срочно! !!!
var
x,i:integer;
begin
read(x);
for i:=1 to x do
if x mod i =0
then write(i,' ');
end.
Другие вопросы из категории
1251. При этом информационное сообщение уменьшилось на 440 байт. Определите длину сообщения в символах.
1. напишите программу формирования массива размером 5*5 с помощью датчика случайных чисел. Замените в нем нечетные значения элементов максимальным. Выведите на экран исходный и измененный массивы.
2. Составьте программу формирования и вывода на печать одномерного массива, состоящего из максимальных элементов строк двумерного массива, заданного с помомщью датчика случайных чисел
Читайте также
1 1 1
2 4 8
3 9 27
----------------
10 100 1000
выведите их произведение. Если третье и четвёртое числа больше100, то выведите среднее арифметическое всех пяти чисел. Если выполняются одновременно два перечисленных выше условия, то выведите на экран все пять чисел без изменения. Иначе, выведите третье и пятое числа, увеличив их в два раза.