Begin var a: integer; readln(a); for i: integer := 1 to abs(a) do if (a mod i = 0) then writeln('> ', i); end.
function Simple(a: integer): boolean; begin result := true; for i: integer := 2 to (a div 2) do if (a mod i = 0) then begin result := false; break; end; end;
begin var a: integer; readln(a); writeln(Simple(a)); end.
var a: integer;
begin readln(a); for i: byte := length(a.ToString()) downto 1 do write(a.ToString()[i]); end.
function Simple(a: integer): boolean; begin result := true; for i: integer := 2 to (a div 2) do if (a mod i = 0) then begin result := false; break; end; end;
function par(a: integer): string; begin for i: byte := length(a.ToString()) downto 1 do result += a.ToString()[i]; end;
begin var a: integer; readln(a); for i: integer := 1 to abs(a) do if ((a mod i = 0) and (Simple(a)) and (par(a) = inttostr(i))) then writeln('> ', i); end.
Редактирование текстового документа - это выполнение в текстовом редакторе функций стандартизированного оформления шрифтов (цвет, жирность, наклон и другие признаки не меняющие содержания), внедрение графики и формул, таблиц и объектов.символы являются теми основными объектами, из которых состоит документ. символы — это буквы, цифры, пробелы, знаки пунктуации, специальные символы, такие, как @, *, & . символы можно форматировать (изменять их внешний вид).среди основных свойств символов можно выделить следующие: шрифт, размер, начертание и цвет.абзац является одним из основных объектов текстового документа. абзац с точки зрения — это часть текста, представляющая собой законченный по смыслу фрагмент произведения, окончание которого служит естественной паузой для перехода к новой мысли.
