Вывод цифр находящихся в строке - Pascal ABC

Pascal ABC

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Рейтинг 4.80/5:

@nyblo 0 / 0 / 0 Регистрация: 16.10.2012 Сообщений: 5

	Вывод цифр находящихся в строке 16.10.2012, 11:48. Показов 1077. Ответов 2 Метки нет (Все метки) Помогите! пожалуйста. Составить прогу вывода всех цифр находящихся в строке. 0

Лучшие ответы (1)

Сообщение: #3566950

cpp_developer

Эксперт

20123 / 5690 / 1417

Регистрация: 09.04.2010

Сообщений: 22,546

Блог

16.10.2012, 11:48

Ответы с готовыми решениями:

Определить сколько в строке цифр находящихся по нечётным адресам и найти их сумму
В диалоговом режиме организовать ввод строки. Определить сколько в строке цифр находящихся по нечётным адресам и найти их сумму. Вывести...

В строке вводимой пользователем определить количество цифр находящихся по чётным адресам и вывести и на экран
В строке вводимой пользователем определить количество цифр находящихся по чётным адресам и вывести и на экран, а так же найти произведение...

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

Valery__

233 / 223 / 146

Регистрация: 19.03.2012

Сообщений: 369

16.10.2012, 12:05

Сообщение было отмечено nyblo как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Program aport_cifr;
Var s:string;
    kod,i,x:integer;
     
BEGIN
  Write('Vvedite stroku ');
  Read (s);
  kod:=0;
  For i:=1 to Length(s) do begin
    Val(s[i],x,kod);
    if kod=0 then Writeln (x);
    kod:=0;
  end;
END.

@nyblo 0 / 0 / 0 Регистрация: 16.10.2012 Сообщений: 5
	17.10.2012, 08:25 [ТС]
	Спасибо.все работает! 0

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

raxper

Эксперт

30234 / 6612 / 1498

Регистрация: 28.12.2010

Сообщений: 21,154

Блог

17.10.2012, 08:25

Помогаю со студенческими работами здесь

Вывод на экран всех нечетные цифр, которых нет во введенной строке
Помогите написать программу, выводящую на экран все нечетные числа(1-9), которых нет в введенной строке

Ввод n-значного числа, вывод цифр, из которых оно состоит и вывод суммы его цифр
Написать программу, осуществляющую ввод n-значного числа, вывод цифр, из которых оно состоит и вывод суммы его цифр. Подключить...

Сумма цифр числа, находящихся на нечетных позициях
Написать программу, подсчитывающую сумму цифр натурального числа, находящихся на нечетных позициях. Нумерация позиций идет слева направо. ...

Найти сумму цифр числа, находящихся на чётных позициях
1. Дано натуральное число N. Найти сумму цифр числа, находящихся на чётных позициях (старшая цифра находится на первой позиции).

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

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

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .	Модульная разработка через nuget packages DevAlt 07.03.2026 Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .	Модульный подход на примере F# DevAlt 06.03.2026 В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .	Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование 8Observer8 05.03.2026 Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .
SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D 8Observer8 04.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .	SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий 8Observer8 02.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip Сканируйте QR-код на мобильном и вы увидите, что появится джойстик для управления главным героем. . . .	Реалии Hrethgir 01.03.2026 Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .	Ритм жизни kumehtar 27.02.2026 Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .

Наверх