Турбо паскаль: Вводится строка и символ

88

Турбо паскаль: Вводится строка и символ. Определить количествослов, содержащих введенный символ.

категория: информатика

ответить

в избранное

52

sbstud

03 августа 2022

Uses crt; a: string; s: char; i,z: integer; beginreadln (a,s); for i: =1 to length (a) do beginif a[i]=s then inc (z); end; writeln (z); end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Знаете другой ответ?

Задайте свой вопрос

Смотрите также:

Общие и единичные понятия к: география, история, информатика, математика, жизнь

Найти количество не отрицательных нечетных элементов двумерного массива

Дана матрица размерности N на M. Вывести номера всех столбцов матрицы, не содержащих отрицательных элементов

Составить программу, реализующую умножение матриц размерностью 3 х 3

В вазе лежат 4 яблока,3 груши,7 мандаринов и 6 киви. Из вазы взяли 1 грушу и 2 мандарина

Как в Worde 2013 настроить проверку пунктуации?

Помогите решить задачу в Кумире!

Из какого максимального колличества листов может состоять рабочая книга excel?

Добрый день. Помогите пожалуйста решить две задачи…

27400

14822

Английский язык

14216

Биология

7369

720

Экономика

18829

8304

География

15850

Геометрия

5255

Информатика

11818

23332

15992

Литература

73118

Математика

8152

Обществознание

466

Правоведение

46271

Русский язык

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!

Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!

Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...