Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Turbo Pascal Составить программу для формирования даннных о книгах https://www.cyberforum.ru/ turbo-pascal/ thread231487.html
Помогите пожалуста составить программу на Turbo Pascal Цель работы: Создать программу, выполняющую действие с записями. Книги. Составить программу для формирования даннных о книгах: Автор, Название, Цена, Год издания. Для введеннных записей организовать сортировку по убыванию по году издания.
Заменить в строке все буквы Ch1 на Ch2 Turbo Pascal
program task; uses crt; var ar:array of string; sl:string; a,i,j,s:integer; ch1,ch2:char; begin clrscr; writeln(''); readln(sl);
Turbo Pascal Вычислить сумму ряда https://www.cyberforum.ru/ turbo-pascal/ thread231477.html
Для заданных с клавиатуры чисел n,m,x вычислить сумму ряда: x+∑(k=1 to m) (-1)k*k S=∑(i=1 to n) ___________________ 1+∑(j=1 to m) (2i+j) Помогите найти ошибку в программе: program bla; var i,j,k,n,m,t:integer; s,s1,s2,s3,x:real;
Turbo Pascal Задан целый (integer) двумерный массив размерностью 3 * 4. https://www.cyberforum.ru/ turbo-pascal/ thread231453.html
Задача. Задано цілий (integer) двовимірний масив розмірністю 3*4. Знайти : 1)кількість парних елементів; 2)добуток елементів значення яких більше рівне за 2; 3)найбільший елемент двовимірного масиву; 4)середнє арифметичне найбільшого і найменшого елемента масиву; --- Mawrat: Перевод: Задача.
Turbo Pascal Блок схема по программе
var mas : array of array of integer; mas_t : array of array of integer; procedura create; var i,j : Integer; begin randomize; for i:=1 to 10 do
Turbo Pascal Пронумеровать (с интервалом 1000) куски определенного текста в файле txt https://www.cyberforum.ru/ turbo-pascal/ thread231443.html
Здраствуйте, помогите решить: нужно пронумеровать (с интервалом 1000) куски определенного текста в файле txt.
Turbo Pascal Составить блок схему к готовому коду uses crt; var n:byte; s,g:string; begin clrscr; repeat write('Введите возраст от 3 до 45 n='); readln(n); until n in ; s:='Мой стаж '; https://www.cyberforum.ru/ turbo-pascal/ thread231416.html Turbo Pascal Умножение/деление длинных чисел
Приветствую Столкнулся с задачами умножения и деления длинных чисел. Прошу по возможности помочь написать код программы.
Turbo Pascal Заполнить массив k*k по правилу https://www.cyberforum.ru/ turbo-pascal/ thread231409.html
Дан двумерный массив размером n*m, заполненный случайными числами. Определить в нем строку с максимальной и столбец с минимальной суммой элементов. Задачу решить за один проход. кто чем может помогите пожалуйста!!
Turbo Pascal Определить, какой должна быть сумма вклада х для получения через m полных месяце сумму y Банковский счёт с ежемесячной выплатой процентов и капитализацией предусматривает увеличение суммы банковского счёта на сумму, составляющую процент от суммы, хранящейся на счёте. При этом полученная прибавка суммы счёта суммируется с общим количеством денег на счёте и используется при расчёте прибавки на следующий месяц. Задан годовой процент p, больший ежемесячного процента в 12 раз.... https://www.cyberforum.ru/ turbo-pascal/ thread231388.html
не могу доресовать флаг! значок один! Turbo Pascal
помогите пожалуйста доресовать в паскале один значек на флаге Гренада в левой стороне! похоже тип на лесточек! вот текст програмки : uses crt,graph; var grmode,grdriver:integer; begin clrscr; grdriver:=detect;
Turbo Pascal Числовые функции Помогите решить! Разработать числовые функции для вычисления y. Для любых a,b,c найти значение функции. y=cos(arcctg 0.2)+arccos(sqrt((c-8*b)/a^2))-arcctg^2((1+c)/(2-0.2*a^4)) Спасибо https://www.cyberforum.ru/ turbo-pascal/ thread231384.html
0 / 0 / 0
Регистрация: 22.12.2010
Сообщений: 13
0

Подсчитать, сколько раз в строке встречаются цифровые и буквенные символы - Turbo Pascal - Ответ 1302377

20.01.2011, 06:47. Показов 1135. Ответов 2
Метки (Все метки)

Студворк — интернет-сервис помощи студентам
Цель работы: Сздать программу модульной структуры, т.е. имеющую в своём составе процедуры и/или функции.

Дана строка. Подсчитать, сколько раз в ней встречаются цифровые и буквенные символы. Вывести на экран колличество этих символов в порядке убывания (например: букв - 16, цифр - 4 или цифр - 20, букв - 18).

Вернуться к обсуждению:
Подсчитать, сколько раз в строке встречаются цифровые и буквенные символы Turbo Pascal
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
20.01.2011, 06:47
Готовые ответы и решения:

Определить, сколько раз в строке встречаются заданные символы
Дана строка символов. Определить, сколько раз в строке встречаются символы ’а’, ‘б’, ‘о’, ‘щ’,...

Дана строка символов. Определить, какие символы и сколько раз встречаются в данной строке
Помогите пожалуйста:)))

Ввести строку. Подсчитать сколько раз в ней встречаются строчные и сколько раз заглавные русские буквы
Всем привет. Очень хотелось бы что бы помогли с решением данной задачи. Ввести строку. Подсчитать...

Подсчитать, сколько раз среди заданных символов встречаются символ + и сколько раз символ *
дана последовательность, состоящая из n символов. подсчитать сколько раз среди данных символов...

2
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
20.01.2011, 06:47
Помогаю со студенческими работами здесь

Подсчитать, сколько различных символов встречаются в строке
Дана строка символов. Подсчитать, сколько различных символов встречаются в ней. Вывести их на экран

Подсчитать сколько раз в заданной строке встречаются символы ‘a’ и ‘1’
Помогите плиз((( 1.Дана символьная строка S. Скопировать посимвольно ее в другую символьную...

Определить, сколько раз и какие символы встречаются в текстовом файле
Эта программка рассчитывает сколько раз и какие символы встречаются в текстовом файле.Нужно...

Дана символьная строка. Вывести на экран те символы которые встречаются в строке более 3х раз
Работа со строками. Дана символьная строка. Вывести на экран те символы которые встречаются в...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru