Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
seocer
18.03.2021 15:18 •
Информатика
Написать программу в паскале. написать и вывести с клавиатуры слово 1 определить его длину 2 3-ю букву 4 посчитать количество букв "е" в слове.
Показать ответ
Ответ:
05.10.2020 06:39
Program u;
var s:string; e,i:integer;
begin;
read(s); writeln(s);
for i:=1 to length(s) do if (s[i]='е') or (s[i]='Е') then e:=e+1;
write('Длина строки ', length(s),', третья буква ', s[3],', кол-во букв "е" ', e);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
milena162
26.05.2021 21:38
Решите по информатике . желательно полное решение, если не сложно. на фотке. заранее )...
2710200013
23.02.2022 13:39
70 былоовпо шестнадцатеричной форме представления целого числа в 2-х байтовой ячейке восстановить само число в десятичной форме.№ варианта вместе1 2 3 1450 -1450 f67d1341...
9Аноним345
20.12.2020 00:08
Битовая глубина равна 16, разрешающая экрана 1024*768. определите бьем видеопамяти, необходимые для хранения двух страниц изображения.(ответ дайте в мбайтах)...
natalya00786
17.12.2020 15:46
Фото размером 13×18см была отсканирована глубиной 24 бита и разрешением 200 dpi. Сколько места она занимает несжатом виде? ...
arscool
15.11.2022 10:12
сколько цветов может быть отражено на экране размером 1024×769,если объем видеоизображения состпвляет 0.48Мб?...
нет169
14.09.2021 16:37
Выясните, какой сигнал должен быть на входе электронной схемы при каждом возможном наборе сигналов на входах. Составьте таблицу работы схемы. Каким логическим выражением описывается...
Карина12345654321
04.01.2020 01:08
Сколько нужно этилена для получения 50 т эталона, если выход продукта составляет 86% от теоретически возможного?...
6666628
04.01.2020 01:08
Вкаких сказках ,рассказах музыка главным героям...
Leprekon11
18.02.2020 13:38
Цена ластика увеличилась с 1.8 рублей до 2.25 рублей . на сколько процентов увеличилась цена ластика?...
kristinakissa1
18.02.2020 13:38
Чем гордились советские люди и что их огорчало...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var s:string; e,i:integer;
begin;
read(s); writeln(s);
for i:=1 to length(s) do if (s[i]='е') or (s[i]='Е') then e:=e+1;
write('Длина строки ', length(s),', третья буква ', s[3],', кол-во букв "е" ', e);
end.