Ток на Паскале могу Program pr; uses crt; Var x:integer; Begin Writeln('введите день недели'); readln(x); case x of 1:Writeln('5 пар'); 2,3:Writeln('4 пары'); 4:Writeln('3 пары'); 5:Writeln('2 пары'); 6,7:Writeln('пар нет'); end; readln; end.
Элементами множества "шрифты" являются семейства шрифтов различных гарнитур, таких как, Arial, Courier New, Times New Roman, Tahoma и т.д.
Среди гарнитур можно выделить два крупных типа: Serif и SanSerif. Серифы - это "засечки" на концах символов, составляющих конкретный шрифтовый набор. Большинство гарнитур к серифам, потому что считается бесспорным следующее утверждение: текст, имеющий "засечки", прочитывается быстрее, чем текст без засечек. Пример гарнитуры типа Serif - шрифты Times и Courier New, типа Sanserif (без засечек) - Arial и Tahoma (этот ответ набран гарнитурой Arial).
Шрифт может быть пропорциональным или моноширинным. В пропорциональном шрифте ширина каждого символа зависит от этого символа, например, буква Ж занимает по ширине больше места, чем Т. В моноширинном шрифте все символы одной ширины. Моноширинные шрифты приводят к увеличению длины набранных слов и поэтому имеют ограниченное применение. Представитель моноширинных шрифтов - Courier New.
Шрифты внутри одной гарнитуры могут отличаться размерами и начертанием. Типичные начертания, кроме обычных - это Italic (курсив) и Bold (выделенный), а также их сочетание ItallicBold.
Program pr;
uses crt;
Var x:integer;
Begin
Writeln('введите день недели');
readln(x);
case x of
1:Writeln('5 пар');
2,3:Writeln('4 пары');
4:Writeln('3 пары');
5:Writeln('2 пары');
6,7:Writeln('пар нет');
end;
readln;
end.