tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Кокова позиция буквы о в
Кокова позиция буквы "о" в члове "слон" (решить в pascal).
vikakocherzhuk
1 08.06.2019 06:20
0
Ответы
Milanaмилана
07.07.2020 14:53
Вот
var
s,x : string;
i,d,krot : longint;
begin
readln(s);
x:='о';
krot:=0;
d:=length(s);
for i:=1 to d do
if pos(x,s[i])<>0
then writeln(i);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
мама1033
27.06.2021 19:00
Нужно конвертировать файл в переменную c#...
svetlana81kolesnik
27.06.2021 18:40
Нужно решение на паскале. Алгоритм вычисления функции F(n), где n – целое неотрицательное число, задан следующимисоотношениями:F(0) = 0,F(n) = F(n / 2) + 3, когда n 0...
fhehneeggbvfs
27.06.2021 18:38
МНОГО ! БЫСТРЕЕ подключить периферию, используя любой графический редактор. Число на поле - это сумма клеток до устройства + ячейка с ним, клетка с цифрой не считается....
Vasyok228
27.06.2021 18:19
подключить периферию, используя любой графический редактор. Число на поле - это сумма клеток до устройства + ячейка с ним, клетка с цифрой не считается. Кабеля не должны...
ЧеловекАнанас
27.06.2021 18:13
Написать программу, которая вводит двумерный массив 3х3 из целых чисел, выводит его на экран в виде матрицы, а затем выводит квадратный корень из каждого элемента. 8 3...
Mixof
27.06.2021 17:42
Написать программу вычисления стоимости покупки с учетом скидки. Скидка в 3% предоставляется в том случае, если сумма покупки не менее 1000 руб., в 5% - если сумма не...
koshkinaeri
27.06.2021 14:26
Из С++ в Python! Очень ! Код на С++: #include using namespace std; int main() { long n; int t[1000001] = {0}; cin n; for (long i = 2; i = n; ++i) { int c = t[i - 1]; if...
marybyl86
27.06.2021 14:26
Из Python в С ! Вот код на С++: def get_ents_num_modulo_p(k, p): if k 2: return 0 num = (k+1)*[0] num[2]=1 for i in range(2,k): num[i+1] = (num[i+1] + num[i]) % p if 2*i...
0Alis11
27.06.2021 14:20
Информационный объем статьи 3744 байт, столько страниц занимает статья, если известно, что на каждой странице 26 строк по 48 символов?...
Alekskarpov
27.06.2021 11:18
(Form application c++)Заполните массив а[n][n] случайными числами в интервале [-200; 200]. Значения N и M вводится через компоненту TextBox. Вывести элементы побочной...
Популярные вопросы
Match the two halves of english sayings. are they similar to any in...
3
Пож надо тип корневой системы у фасоли кукурузы и ромашки...
3
Раз берите по составу слово заблудились...
3
Даны два трехзначных числа. найдите шестизначное число, образованное...
2
Разделить на группы слова закличка, загадка, задумка,завязка, зачин,...
2
5нужно дополнить предложения глаголами в форме простого времени of...
2
Моё отношение к остапу. ( произведение тарас бульба) ) заранее )...
3
Людмила защищает свои пароли так: двигаясь от краев пароля к его центру,...
2
Що називають оком і вухом астронома...
1
Решить уравнение 9целых3/5 : (1целая11/25х - 4целых1/5) : 2целых3/10...
2
var
s,x : string;
i,d,krot : longint;
begin
readln(s);
x:='о';
krot:=0;
d:=length(s);
for i:=1 to d do
if pos(x,s[i])<>0
then writeln(i);
end.