Var A,N,C:byte; B:boolean; Begin B:=false; Write('N = ');ReadLn(N); A:=10; While A<100 do Begin if A mod N = 0 then Begin C:=A; While C<>0 do Begin if C mod 10 = N then B:=true; C:=C div 10 End; if B then Write(A,' '); B:=false End; A:=A+1 End End.
1.трудно воспринимать текст, написанный в разных стилях. 2. готовый вид документа с определенными полями 3. при оформлении официальных документов (шапка, заголовок, основное содержание)4.шрифт times new roman подходит как и для основного текста, так и для заголовков. заголовки лучше набирать полужирным шрифтом, но можно и курсивом .5. открываем word и находим вкладку верхнего меню «рассылки». переходим в нее и видим, что первая слева группа команд называется «создание» и содержит две кнопки: «конверты» и «наклейки». нас интересуют именно шаблон конверта в word, так то кликаем по этой кнопке.6.при кнопки список в этом редакторе можно составить маркированные и нумерованные списки. такая кнопка есть в процессоре ms word , она находится на вкладке ленты главная . 7. маркерованные это символы и картинки, нумерованные 1,2,3,,а,б,,б,.b.,b,c ,ii,,ix,xv 1-й,2-,и.т.д8. списки которые смешанные, имеют и маркерованные и нумерованные.9.вставка-- рисунок или просто перетащить из папки.вставка --формулавыделить объект-- правая кнопка мыши--гиперссылка10.к огда информация состоит из множества данных, которые модно груаппировать по какому-либо признаку на несколько
A,N,C:byte;
B:boolean;
Begin
B:=false;
Write('N = ');ReadLn(N);
A:=10;
While A<100 do
Begin
if A mod N = 0 then
Begin
C:=A;
While C<>0 do
Begin
if C mod 10 = N then B:=true;
C:=C div 10
End;
if B then Write(A,' ');
B:=false
End;
A:=A+1
End
End.