Форум программистов, компьютерный форум, киберфорум
Наши страницы
QBasic
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/4: Рейтинг темы: голосов - 4, средняя оценка - 5.00
n1ck
0 / 0 / 0
Регистрация: 19.12.2011
Сообщений: 7
1

Подсчитать количество шипящих букв в слове

07.01.2012, 17:24. Просмотров 738. Ответов 5
Метки нет (Все метки)

1)Задача:
подсчитать количество шипящих букв в слове
2)Задача:
В массиве из 10 элементов найти и отпечатать колличество и сумму элементов, значение которых больше последнего элемента массива.
3)Задача:
Дана матрица 3 порядка. Уменьшить отрицательные элементы матрицы в 2,3 cтолбцах на 4 единицы. Вывести на печать исходную и новую матрицы
0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
07.01.2012, 17:24
Ответы с готовыми решениями:

Подсчитать количество шипящих букв в слове
подсчитать количество шипящих букв в слове (Любое слово)

Подсчитать количество шипящих букв в слове
Задача: подсчитать количество шипящих букв в слове

Подсчитать количество букв K и D в слове
Помогите решить задачи: а) Дан массив В (N). Если пятый элемент таблицы...

Подсчитать количество различных букв в заданном слове
ПОМОГИТЕ РЕШИТЬ ЗАДАЧИ! 1.В ЭВМ вводятся по очереди данные о росте N...

Ввести слово и в слове подсчитать количество согласных букв
Need help =\ 1) Ввести слово и в слове подсчитать количество согласных букв...

5
Коровьев
98 / 43 / 13
Регистрация: 02.05.2011
Сообщений: 408
08.01.2012, 13:09 2
2ая
PureBasic
1
2
3
4
5
6
7
8
/заполнили массив
k=0
s=0
FOR i=1 TO 10 
IF a(i)>a(10) THEN k=k+1 AND s=s+a(i)
NEXT i
PRINT(i)
PRINT(s)
Добавлено через 20 минут
1ая
PureBasic
1
2
3
4
5
6
7
8
9
10
11
12
13
INPUT a$
b=LEN(a$)
k=0
FOR i=1 TO b
s$=MID$(a$,i,1)
SELECT CASE s$
CASE "ш":k=k+1
CASE "ч":k=k+1
CASE "щ":k=k+1
CASE "ц":k=k+1
END SELECT
NEXT i
PRINT(k)
PC ниодин код я не проверял
1
m-ch
5268 / 809 / 271
Регистрация: 25.02.2011
Сообщений: 1,138
Записей в блоге: 1
08.01.2012, 13:43 3
Вариант 1 задачи:
PureBasic
1
2
3
4
5
6
a$ = "Шипящие"
k = 0
FOR i = 1 TO LEN(a$)
IF INSTR("ЦЧШЩцчшщ", MID$(a$, i, 1)) THEN k = k + 1
NEXT i
PRINT k
1
кот Бегемот
Платежеспособный зверь
8502 / 3939 / 1536
Регистрация: 28.10.2009
Сообщений: 10,229
08.01.2012, 17:01 4
Ц- не шипящая она в списке лишняя, а вот Ж - не хватает
1
n1ck
0 / 0 / 0
Регистрация: 19.12.2011
Сообщений: 7
09.01.2012, 00:44  [ТС] 5
Это спасибо, а как нарисовать Блок-схему к ним?
0
Памирыч
09.01.2012, 00:55     Подсчитать количество шипящих букв в слове
  #6
 Комментарий модератора 
n1ck, П.п 4.5 Правил:Если какой-либо пост на форуме показался вам полезным, нажмите кнопку "Спасибо" внизу самого поста.
0
09.01.2012, 00:55
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
09.01.2012, 00:55
Привет! Вот еще темы с ответами:

В введенном тексте подсчитать количество цифр, всех букв, прописных букв, заглавных букв
Помогите,пожалуйста программа на QBasic В введенном тексте подсчитать...

Подсчитать число различных букв в слове
Подсчитать число различных букв в слове. Нашел на паскале эту задачу, как...

Во введенном тексте подсчитать количество символов в слове максимальной длины
Приветик ребят!) Это ппц(((( Это реально решить на QBasic?? Подруга сказала,...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru