Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Аккаунт удален
24.02.2022 07:14 •
Информатика
M: =0; for i: =1 to length (a)do if copy (a,i,1)=(e) then m: =m+1 writin (m); нужно место е поставить точку . нужно
Показать ответ
Ответ:
Aleksandra2320323
05.10.2020 20:13
m:=0;
for i:=1 to length(a) do
if copy (a,i,1)='.' then m:=m+1;
writeln(m);
А лучше так:
m:=0;
for i:=1 to length(a) do
if a[i]='.' then m:=m+1;
writeln(m);
0,0
(0 оценок)
Популярные вопросы: Информатика
Quantum2004
13.08.2020 02:13
Перевести число 102 (десятичное) в двоичную, восьмеричную, шестнадцатеричную, семеричную систему...
aleksaprincessa
08.06.2021 06:00
Работа с картой: Выпишите основные победы революционных войск...
Lunatuk
08.06.2021 06:00
Який вигляд мав дух різдвяних свят?Яки дивні деталі підкреслюють його фантастичність?Визначте протилежні елементи в його описі.Що на вашу думку вони означають? (різдвяна...
таня1697
08.06.2021 06:00
Зымыран , аялдама , пайыз , саябақ , театр , суқойма , материк , бокс , диагноз , əңгелек , қауашақ қоза , қарма деген сөздерге сөйлем...
danilox2007
08.06.2021 06:00
25.Историческое значение битвы у Атлаха в судьбе тюркских народов: А) Был образован союз кимакских племенВ) Переселение согдийцев в СемиречьеС) Китайцы были изгнаны...
nog2018
08.06.2021 06:00
A) Hast du eine Garage? Nein, ich habe keine b) Hast du einen Balkon? Ja, ich habe c) Hast du eine Wohnung? Ja, ich habe d) Hast du einen Garten ? Nein, ich habe e)...
VetaRo
08.06.2021 06:00
Реши задачу На корабль погрузили 23/8 тонны пресной воды. В первый день израсходавали 3/4 тонны, во второй 5/6 тонны больше, чем в первый. Сколько тонн пресной воды...
maksivanchuk123
08.06.2021 06:00
Решите тест по алгебре приближенные вычисления (оба варианта по 3 вопроса)...
longer123
08.06.2021 06:00
«С каких олицетворений, метафор картина становится более яркой и выразительной...
NONONONONO228
08.06.2021 06:00
1)написать уравнение окружности с центром (-1;3) и радиусом 7 2) проходит ли окружность (х-2)^2+(у+4)^2=10 через точку (3;-7) 3) написать уравнение примой КМ проходящей...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
for i:=1 to length(a) do
if copy (a,i,1)='.' then m:=m+1;
writeln(m);
А лучше так:
m:=0;
for i:=1 to length(a) do
if a[i]='.' then m:=m+1;
writeln(m);