1.Типографские литеры определённого размера и рисунка для набора, а также отпечаток их.2.Гарниту́ра<span> в </span>типографике<span> — набор из одного или нескольких </span>шрифтов в одном или нескольких размерах и начертаниях, имеющих стилевое единство рисунка и состоящих из определённого набора типографских знаковформатирование текста<span> — Подготовка текста документа к выводу на печать в необходимой для этого форме. Включает в себя форматирование абзацев, отдельных символов, заголовков, сносок, колонцифр и т.д. </span>.
Var n,k : Integer;
Begin
k:=-1;
Readln(N);
While N>0 do
Begin
If (not Odd(N mod 10)) and ((N mod 10)>k) then k:=N mod 10;
N:=N div 10;
end;
If k=-1 then Writeln('не найдено') else Writeln(k);
end.
//PascalABC.NET
//Версия 3.3, сборка 1634
begin
var n:=ReadInteger;
var p:=1.0;
for var i:=1 to n do p:=p*i;
write(p);
end.
Var a,b:integer;
begin
write('Введите число a: ');
readln(a);
write('Введите число b: ');
readln(b);
if (a > b) then
writeln('a больше b')
else if (b > a) then
writeln('b больше a')
else
writeln('a равен b');
end.