tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Дано предложение. определить
Дано предложение. определить долю (в%) букв «а» в нем. )
Roma1231
1 24.06.2019 16:30
9
Ответы
Imfind
20.07.2020 06:47
PascalABC.Net
взял символ английская a
если что заменишь
var
s : string;
i,l,k : integer;
r : real;
begin
readln (s);
l := Length (s);
for i := 1 to l do
if s[i] = 'a' then
k := k + 1;
r := trunc(k/l * 100);
writeln (r,'%');
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Ŕöömää999
19.04.2021 15:23
В методе massiv создайте два массива b[] и c[] по 10 чисел. Вычислите суммы чисел этих массивов, сравните и выведите тот массив, сумма чисел которого наименьшая Язык программирования:...
imancom2005
02.08.2019 14:20
Дан массив x(n,m) . найти номер тех строк массива, элементы которых по возрастанию. сделать в паскале...
lacosterom
02.08.2019 14:20
Для чего предназначена каждая из программ( кратко): 1. picasa 2. gimp 3. audacity 4. word 5. winrar 6. firefox 7. kaspersky anti-virus 8. skype...
Liliya000001
17.05.2019 12:30
Напишите программу которая считает сумму положительных из трех веденный чисел как это записать в программе паскаль?...
vikysik927
29.04.2020 12:18
с рисунком в паскаль Сделайте на уровне 9 класса,чтобы было незаметно. Можно нарисовать дельфина без графика. Заранее...
serg159
08.06.2020 02:20
Предположим, я написал программу на питоне, и открыл с ее определенный файл. Как заставить программу как либо с ним взаимодействовать? К примеру, прочесть его, либо выполнить....
mruzer1999
08.06.2020 02:22
Кто умеет создавать сайт на языке HTML? Нужно чтобы он был из 5 страниц, с картинками и текстами (Для программы блокнот, написать эти теги )...
iragav30
26.05.2021 15:05
Напишите программу, которая в последовательности натуральных чисел определяет максимальное число, кратное 5. Программа получает на вход количество чисел в последовательности,...
MashaE631
26.05.2021 15:01
Представьте указанное число 8710 в 8-разрядном формате...
данил2908
26.05.2021 14:56
В таблице змейкой размещены три слова, связанные с темой урока (их можно читать по горизонтали и по вертикали, но не по диагонали). Слова в ответе записывайте через один...
Популярные вопросы
Как состовлять зашифрованные примеры 4класс...
2
H2o + = h2so3 i i что нужно подставить вместо...
1
Дальше в лес-больше дров.волков бояться-в лес не ходить. обозначь опасные...
1
Подберите к каждому слову - названию предмета имя прилагательное коньки,...
2
Поставьте вместо точек данный в скобках глагол в соответствующем лице...
3
Сочинение на тему родина нужно решение прямо сейчас 5,6 предложений...
2
Как разобрать по состпау сероватеньеий...
2
Из колоды карт вынимают наугад две карты какова вероятность того что...
1
Вычислите.если можети распишити по действиям как правельно решить.просто...
2
Даны длины двух катетов a и b прямоугольного треугольника. определить...
1
взял символ английская a
если что заменишь
var
s : string;
i,l,k : integer;
r : real;
begin
readln (s);
l := Length (s);
for i := 1 to l do
if s[i] = 'a' then
k := k + 1;
r := trunc(k/l * 100);
writeln (r,'%');
end.