Найти колличество делителей и чётных делителей у натурального числа.с помощью программы Paskal.
Program chislo;
var N,delit,count,ccount:integer;beginread(N);count:=0; ccount:=0;for delit:=1 to N doif N mod delit = 0 thenbegincount:=count+1;if (delit mod 2 = 0) then ccount:=ccount+1;end;writeln('Делителей: ',count);writeln('Четных делителей: ',ccount);end.
В какой оболочке земли живёт большинство живых организмов?
Из каких неживых частей состоит экосистема
На какие расы делятся население земли
Определение статуса военнослужащего (краткий ответ!!)
Проведи следущие наблюдения в классе: один учащийся спокойно сидит за партой, слушая объяснения учителя; второй записывает план объяснения в тетради ; третий ученик вышел к доске отвечать на вопрос учителя. назови движущиеся тела. относительно каких других тел они движутся ?
Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.