Сформировать и вывести на экран массив, элементы которого заданы датчиком случайных чисел на интервале [-26, 48] (размер произвольный). Найти произведение элементов с четными номерами, которые превосходят некоторое число t. С++
1) экономит время - применить стиль как набор параметров форматирования значительно быстрее, чем задавать соответствующие параметры один за другим;
2) обеспечивает единообразие в оформлении текстового документа - при прямом форматировании одинаковые по функциональному назначению структурные элементы могут отличаться своими форматами; применение определённого стиля вносит строгость в оформление документа;
3) позволяет быстро изменить вид отдельных элементов во всём документе - достаточно внести изменения в стиль, и оформление будет изменено во всём документе.
А) var s:string; mas:array ['a'..'z'] of longint;{индексы элементов соответствуют латинице} c:char; i:longint; begin read(s); for c:='a' to 'z' do{заполнение нулями элементов массива, для запоминания количества элементов в латинице} mas[c]:=0; for i:=1 to ord(s[0]) do{пробегаем по всей строке ord(s[0]) это количесвто элементов в строке (только паскаль)} mas[s[i]]:=mas[s[i]]+1; for c:='a' to 'z' do{пробегаем по массиву значений и выводим только неповторяющиеся} if(mas[c]=1) then writeln(c); end.
Стилевое форматирование имеет ряд преимуществ:
1) экономит время - применить стиль как набор параметров форматирования значительно быстрее, чем задавать соответствующие параметры один за другим;
2) обеспечивает единообразие в оформлении текстового документа - при прямом форматировании одинаковые по функциональному назначению структурные элементы могут отличаться своими форматами; применение определённого стиля вносит строгость в оформление документа;
3) позволяет быстро изменить вид отдельных элементов во всём документе - достаточно внести изменения в стиль, и оформление будет изменено во всём документе.
var s:string; mas:array ['a'..'z'] of longint;{индексы элементов соответствуют латинице} c:char; i:longint; begin read(s); for c:='a' to 'z' do{заполнение нулями элементов массива, для запоминания количества элементов в латинице} mas[c]:=0; for i:=1 to ord(s[0]) do{пробегаем по всей строке ord(s[0]) это количесвто элементов в строке (только паскаль)} mas[s[i]]:=mas[s[i]]+1; for c:='a' to 'z' do{пробегаем по массиву значений и выводим только неповторяющиеся} if(mas[c]=1) then writeln(c); end.