эх, простая задачка но тоже времени нету её делать. в общем надо делать перебором до корня из этого числа. в цикле надо проверять делится ли это число на счетчик.
помогите пожалуйста очень нужно до завтра сделать. Дама матрица порядка n*m. найти номера строк в которых все елементы одинаковы. Пример матрицы: 1 1 1 1 2 1 3 4 2 2 2 2
advencher, берешь 2 вложенных цикла: первый выбирает строки, второй идет по этой строчке. Перед запуском 2го цикла берешь одну логическую переменную :=TRUE и одну целочисленную Х:= первому элементу строки. Потом во втором цикле сравнивай элементы строчки с Х, и если он не равен X, то логическую переменную присваиваешь ЛОЖЬ, если равен ничего не делать. Потом после этого цикла смотришь логическую переменную и если она ПРАВДА, то выводишь её. И т.д.
1.Найти сумму делителей натурального числа.2.Найти самую большую цифру целого положительного числа.3. Вычеслить значение с=а+в, если а – четное и с=а*b, если а – нечетное.4.Разработать алгоритм программы, которая анализирует человека по возрасту и относит к одной из четырех групп: дошкольник, ученик, работник, пенсионер. Возраст вводится с клавиатуры
Moonss, 1.For i:=1 to c div 2 do if c mod i=0 then k:=k + 1; где с-введён.число,k колич.дел 2.max:=0; while c<>0 do begin i:=c mod 10; if i>max then max:=i; c:=c div 10; end 3. if a mod 2=0 then ... else ...; 4. var d,sh,r,p:set of integer; begin writeln(...); readln(v); d:=0..7;{дошкольники} ... p:=60..100;{пенсионеры} if v in d then wraitln("дошкольник");
4 июн 2009 в 12:31