Форум программистов, компьютерный форум, киберфорум
Free Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.88/8: Рейтинг темы: голосов - 8, средняя оценка - 4.88
0 / 0 / 0
Регистрация: 14.08.2016
Сообщений: 1
1

Имеется литерный массив длиной N элементов. Подсчитайте сколько раз встретился символ "+" и сколько раз "*"

15.03.2013, 00:21. Просмотров 1623. Ответов 1
Метки нет (Все метки)


имеется литерный массив длиной N элементов. Подсчитайте сколько раз встретился символ "+" и сколько раз "*". Значение N и элементы массива введите с клавиатуры
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
15.03.2013, 00:21
Ответы с готовыми решениями:

Подсчитайте, сколько раз в массиве встречается число "1".
дан одномерный массив.Подсчитайте,сколько раз в этом массиве встречается число "1",если такого...

Подсчитать, сколько раз среди заданных символов встречается символ "+" и сколько раз символ "*"
даны натуральное число n, символы s1,...sn. Подсчитать: сколько раз среди данных символов...

Сколько раз среди заданных символов встречается символ "+" и сколько раз символ "*"
Даны натуральное число n, символы S1, S2, ..., Sn. Подсчитать: сколько раз среди данных символов...

В заданной строке подсчитать сколько раз встречается символ "*" и сколько раз символ "+"
Итак, сама задача: В заданной строке подсчитать сколько раз встречается символ "*" и сколько раз...

__________________
Помогаю в написании курсовых работ и дипломов здесь.
1
221 / 219 / 218
Регистрация: 03.07.2012
Сообщений: 460
15.03.2013, 04:39 2
Лучший ответ Сообщение было отмечено как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
program m1;
uses
  crt;
const
  Nmax = 50;
var
  a : array[1..Nmax] of string;
  N, i, k, j, k1 : byte;
begin
  repeat
  write('N = ');
  readln(N);
  until N in [1..Nmax];
  for i := 1 to N do
    begin
      write('a[',i,'] = ');
      readln(a[i]);
    end;
  k := 0;
  k1 := 0;
  for i := 1 to N do
    for j := 1 to length(a[i]) do
      if a[i][j]='+' then inc(k)
      else if a[i][j]='*' then inc(k1);
  writeln('Кол-во символов "+" : ',k);
  writeln('Кол-во символов "*" : ',k1);
  readln;
end.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
15.03.2013, 04:39

Заказываю контрольные, курсовые, дипломные работы и диссертации здесь или здесь.

Сколько раз среди данных символов встречается символ "+" и символ "*"
Сколько раз среди данных символов встречается символ "+" и символ "*"

Подсчитать сколько раз в тексте встречаются буквы "л" и "а" стоящие отдельно.заменитьь все буквы "л" на "77"
Задача.Подсчитать сколько раз в тексте встречаются буквы "л" и "а" стоящие отдельно.заменитьь все...

Посчитать сколько раз в рядке встречается буква "а" и вывести символы перед первой буквой "а"
Всем привет! Задание такое: посчитать и вывести сколько раз в рядке встречается буква "а" и вывести...

Дано множество строчных латинских букв.Подсчитать сколько раз в это множеств входит от "C" до "D".
Дано множество строчных латинских букв.Подсчитать сколько раз в это множеств входит от "C" до "D".


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

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

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