Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal ABC Строки. Подсчитать количество букв "р" в первых трех словах данного текста http://www.cyberforum.ru/pascalabc/thread549949.html
дан текст. создать программу показывающую количество буквы "р" в первых трех словах данного текста.
Pascal ABC Протабулировать заданную функцию при изменении аргумента
Помогите пожалуйста с программой. Заранее Благодарен! Надо использовать цикл с постусловием и протабулировать заданную функцию при изменении аргумента от начального значения до конечного значения...
Pascal ABC Строки. Вывести слова в порядке убывания количества цифр в них
вводится предл.(слова разделены пробелами в конце точка).внутри слов встречаются цифры.вывести слова в порядке убывания кол-ва цифр в них.сколько слов этого предложения не содержат цифр? Добавлено...
Pascal ABC Подсчет количества делителей числа с клав-ы вводятся n чисел.вывести те из них сумма которых-простое число.использовать вспомогательный алгоритм подсчета кол-ва делителей.решить с использованием процедуры и функции(2 способа) ... http://www.cyberforum.ru/pascalabc/thread549749.html
Pascal ABC Описать процедуру Split2, формирующую по целочисленному массиву массив четных и массив нечетных http://www.cyberforum.ru/pascalabc/thread549704.html
Описать процедуру Split2(A, NA, B, NB, C, NC), формирующую по целочисленному массиву A размера NA два целочисленных массива B и C размера NB и NC соответственно; при этом массив B содержит все четные...
Сортировка одномерного массива с использованием алгоритмов поиска минимального и максимального Pascal ABC
1. Разработать функцию поиска минимального элемента одномерного массива. Разработать процедуру поиска номера максимального элемента одномерного массива. Написать программу сортировки одномерного...
Pascal ABC Программа по запросу выдает сведения о классе или сообщение о том, что класс не найден
В текстовом файле содержатся сведения о количестве учащихся в классах и их классных руководителях. Количество классов в школе не превышает 20. Для описания каждого класса отводится одна строка. В...
Pascal ABC Дана матрица размера M × N. Найти номер ее строки с наибольшей суммой элементов и вывести данный номер, а также значение наибольшей суммы. Дана матрица размера M × N. Найти номер ее строки с наибольшей суммой элементов и вывести данный номер, а также значение наибольшей суммы. http://www.cyberforum.ru/pascalabc/thread549514.html
Pascal ABC Дано множество A из N точек с целочисленными координатами x, y. Порядок на координатной плоскости определим следующим образом: a. (x1, y1) < (x2, y2) http://www.cyberforum.ru/pascalabc/thread549510.html
Дано множество A из N точек с целочисленными координатами x, y. Порядок на координатной плоскости определим следующим образом: a. (x1, y1) < (x2, y2), если либо x1 < x2, либо x1 = x2 и y1 < y2. b....
Pascal ABC Дано целое число K (> 0) и целочисленный массив размера N. Поменять местами последнюю серию массива и его серию с номером K (определение серии дано в Дано целое число K (> 0) и целочисленный массив размера N. Поменять местами последнюю серию массива и его серию с номером K (определение серии дано в задании Array116). Если серий в массиве меньше K,... http://www.cyberforum.ru/pascalabc/thread549509.html
КонецСвета
Почетный модератор
7942 / 3913 / 2464
Регистрация: 30.10.2011
Сообщений: 5,377
16.04.2012, 16:50 0

записи и множества

16.04.2012, 16:50. Просмотров 871. Ответов 1
Метки (Все метки)

Лучший ответ Сообщение было отмечено investr как решение

Решение

Цитата Сообщение от investr Посмотреть сообщение
2.Ввести строку, состоящую из цифр, знаков препинания, латинских и русских букв. Найти количество цифр в строке
Pascal
1
2
3
4
5
6
7
8
9
uses crt;
var s: string;
    i,k: byte;
begin
write('s='); readln(s);
for i:=1 to length(s) do
    if s[i] in ['0'..'9'] then inc(k);
write('Количество цифр ',k);
end.


Вернуться к обсуждению:
записи и множества
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
16.04.2012, 16:50

записи и множества
При поступлении в университет лица, получившие оценку «неудовлетворительно» на первом экзамене, ко...

Записи и множества
При поступлении в университет лица, получившие оценку «неудовлетворительно» на первом экзамене, ко...

Строки, записи, множества
В городе N имеется 100 кондитерских магазинов. Известно, что в каждом из этих магазинов не более 20...

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