сервис вопросов и ответовПрограмма на Pascal ABC. С клавиатуры вводится маленькими русскими буквами строка, необходимо для каждого символа вывести, а) сколько раз его употребили и
5-9 класс|
|
б) частоту употребления (отношение а к длине строки, не считая пробелов).
Примечание 1. Выводить только для маленьких русских букв, пробелы не трогать.
Пример. Вводится строка 'раз два три'. нужно вывести:
р - 2 раза, ч.у - 0.27 //Округление до сотых
... Ну и так далее. Два раза один и тот же символ не выводить!
Вводить новые переменные можно в любом количестве.
Magomed06
04 апр. 2015 г., 15:50:29 (9 лет назад)
Amink
04 апр. 2015 г., 17:01:21 (9 лет назад)
var
len,i:integer;
st:string;
c:char;
ar:array['а'..'я'] of integer;
begin
readln(st);
for i:=1 to length(st) do begin
if (st[i] in ['а'..'я']) then inc(ar[st[i]]);
if (st[i] <> ' ') then inc(len);
if (st[i] = 'ё') then inc(yo);
end;
for c:='а' to 'я' do
if (ar[c] <> 0) then writeln(c,'- ',ar[c], ' ч.у - ',ar[c]/len:1:2);
if (yo <> 0) then writeln('ё', '- ', yo, ' ч.у - ', yo / len:1:2);
end.
Rus605
04 апр. 2015 г., 17:53:25 (9 лет назад)
Все вопросы в комментариях
Ответить
Другие вопросы из категории
Читайте также
написать программу на Pascal abc в которой разными цветами в центре и по углам экрана будет выводиться имя "Сергей" и проверить работоспособность на
компьютере( то есть проверить будет ли работать программа)
Составить программу, которая выводит на экран в обратном порядке нечетные числа от 29 до 1 в Pascal ABC.
Составить программу,которая выводит на экран сумму нечетных чисел от 1 до 30 в Pascal ABC.
Помогите решить эти 16 вариантов, или хотя бы несколько. Что нужно сделать: Составить программу в Pascal ABC( Нужно сделать так, чтобы вы вводили
координаты х и у и программа проверяет, подходит ли эта точка к графику или нет. Пример на 2 фото.
Очень нужно. 80 баллов
с клавиатуры вводится число х. если
с клавиатуры вводится число х. если остаток от деления х на 6 равен 2, то значение f(x)=4*x^2 если остаток от деления х на 6 равен 3, то значение f(x) = корень из х , если остаток от деления на 6 =0 то f(x) = x.
Написать программу в паскале используя операторы if и else . Нарисовать блок схему
Вы находитесь на странице вопроса "Программа на Pascal ABC. С клавиатуры вводится маленькими русскими буквами строка, необходимо для каждого символа вывести, а) сколько раз его употребили и", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.