Меню сайта
Наш опрос
Оцените мой сайт
Всего ответов: 6
Статистика

Онлайн всего: 1
Гостей: 1
Пользователей: 0
Главная » 2014 » Июль » 22 » Некоторые секреты языков программирования
14:58
Некоторые секреты языков программирования

Есть задачи, которые можно достаточно быстро решить, зная особенности программирования на Паскале или Си.Например, перевести число в римской системе счисления в десятичную. Известно, что римская система непозиционная и каждому символу соответствует одно и тоже A'..'Z'] of integer;Тогда при обращении к элементу массива с заданной буквой мы точно будем знать его значение в римской системе, т.е. A'..'Z'] of integer; S:string; i,r:integer;begin readln(s); %d",r); return 0;}Есть еще задача: вычислить частоту появления символов латинского языка (в %) в заданном тексте.Var A:array['a'..'z'] of integer; k,i:integer; c:char;begin fillchar(A,sizeof(A),0);//инициализация массива a'..'z'] then begin to 'z' do if A[c]>0 then writeln(c,'-',A[c]/k*100:0:2);end.При этом сортировка в алфавитном порядке не нужна. Если нужно выводить в порядке убывания или возрастания частоты, то делаем сортировку, например, пузырек или любую другую. Если учитывать заглавные символы, то нужно перевести все заглавные в строчные смещением на 32 в коде символа (известно, что в кодовой таблице заглавные символы отстоят от строчных ровно на 32 позиции): /"<<mounth<<"/"<<year;return 0;}Для считывания времени символ-разделитель будет двоеточие.


купить акпп
Просмотров: 122 | Добавил: admin | Рейтинг: 0.0/0
Всего комментариев: 0
avatar
Форма входа
Календарь
«  Июль 2014  »
ПнВтСрЧтПтСбВс
 123456
78910111213
14151617181920
21222324252627
28293031
Архив записей