Элементами множества "шрифты" являются семейства шрифтов различных гарнитур, таких как, Arial, Courier New, Times New Roman, Tahoma и т.д.
Среди гарнитур можно выделить два крупных типа: Serif и SanSerif. Серифы - это "засечки" на концах символов, составляющих конкретный шрифтовый набор. Большинство гарнитур к серифам, потому что считается бесспорным следующее утверждение: текст, имеющий "засечки", прочитывается быстрее, чем текст без засечек. Пример гарнитуры типа Serif - шрифты Times и Courier New, типа Sanserif (без засечек) - Arial и Tahoma (этот ответ набран гарнитурой Arial).
Шрифт может быть пропорциональным или моноширинным. В пропорциональном шрифте ширина каждого символа зависит от этого символа, например, буква Ж занимает по ширине больше места, чем Т. В моноширинном шрифте все символы одной ширины. Моноширинные шрифты приводят к увеличению длины набранных слов и поэтому имеют ограниченное применение. Представитель моноширинных шрифтов - Courier New.
Шрифты внутри одной гарнитуры могут отличаться размерами и начертанием. Типичные начертания, кроме обычных - это Italic (курсив) и Bold (выделенный), а также их сочетание ItallicBold.
Среди гарнитур можно выделить два крупных типа: Serif и SanSerif. Серифы - это "засечки" на концах символов, составляющих конкретный шрифтовый набор. Большинство гарнитур к серифам, потому что считается бесспорным следующее утверждение: текст, имеющий "засечки", прочитывается быстрее, чем текст без засечек. Пример гарнитуры типа Serif - шрифты Times и Courier New, типа Sanserif (без засечек) - Arial и Tahoma (этот ответ набран гарнитурой Arial).
Шрифт может быть пропорциональным или моноширинным. В пропорциональном шрифте ширина каждого символа зависит от этого символа, например, буква Ж занимает по ширине больше места, чем Т. В моноширинном шрифте все символы одной ширины. Моноширинные шрифты приводят к увеличению длины набранных слов и поэтому имеют ограниченное применение. Представитель моноширинных шрифтов - Courier New.
Шрифты внутри одной гарнитуры могут отличаться размерами и начертанием. Типичные начертания, кроме обычных - это Italic (курсив) и Bold (выделенный), а также их сочетание ItallicBold.
Представлю 3 программы два с массивом и один без массива
1)var a:array [1..10] of integer;
i,n,k5,k2:integer;
begin
writeln('введите количество экзаменов');
read(n);
for i:=1 to n do begin
writeln('введите оценку за экзамен');
readln(a[i]);
end;
for i:=1 to n do begin
if a[i]=5 then k5:=k5+1;
if a[i]=2 then k2:=k2+1;
end;
writeln('количество пятерок ',k5);
writeln('количество двоек ',k2);
end.
2)var a:array [1..10] of integer;
i,n,k5,k2:integer;
begin
writeln('введите количество экзаменов');
read(n);
for i:=1 to n do begin
writeln('введите оценку за экзамен');
readln(a[i]);
if a[i]=5 then k5:=k5+1;
if a[i]=2 then k2:=k2+1;
end;
writeln('количество пятерок ',k5);
writeln('количество двоек ',k2);
end.
3)var a,i,n,k5,k2:integer;
begin
writeln('введите количество экзаменов');
read(n);
if n<=10 then begin
for i:=1 to n do begin
writeln('введите оценку за экзамен');
readln(a);
if a=5 then k5:=k5+1;
if a=2 then k2:=k2+1;
end;
writeln('количество пятерок ',k5);
writeln('количество двоек ',k2);
end;
end.