Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.78/9: Рейтинг темы: голосов - 9, средняя оценка - 4.78
1 / 1 / 0
Регистрация: 20.11.2016
Сообщений: 85

Определить, возможно ли строку преобразовать в число, и, если возможно, то в какое, целое или вещественное

12.04.2017, 09:51. Показов 1966. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Дана строка. Если она представляет собой запись целого числа, то вывести 1, если вещественного (с дробной частью) — вывести 2; если строку нельзя преобразовать в число, то вывести 0. Считать, что дробная часть вещественного числа отделяется от его целой части десятичной точкой «.».
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
12.04.2017, 09:51
Ответы с готовыми решениями:

Определить, возможно ли строку преобразовать в число
Дана строка. Если она представляет собой запись целого числа, то вывести 1, если вещественного (с дробной частью) — вывести 2; если строку...

Ввести строку и определить, возможно ли её преобразовать в число?
тут нужно использовать процедуру val program m1; var s:string; v,k:integer; begin readln(S); val(S,v,k);

Является ли подстрока числом? Если да, выяснить: целое или вещественное число, положительное или отрицательное
Недавно только поступил на программирование. С делфи еще совсем не освоился, был бы рад хоть какой - то помощи. Всего 8 заданий, 3 уже...

2
Эксперт Pascal/Delphi
6812 / 4568 / 4820
Регистрация: 05.06.2014
Сообщений: 22,433
12.04.2017, 10:14
Дана строка. Если она представляет собой запись целого числа, то вывести 1
0
Модератор
10451 / 5741 / 3409
Регистрация: 17.08.2012
Сообщений: 17,474
12.04.2017, 19:34
Лучший ответ Сообщение было отмечено gogo2099 как решение

Решение

Без элементов интерфейса.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
var s: string;
    i, ei, er: integer;
    r: real;
begin
  readln(s);
  val(s, i, ei);
  val(s, r, er);
  if (pos('.', s) > 0) and (er = 0)
    then writeln(2)
    else if ei = 0
      then writeln(1)
      else writeln(0)
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
12.04.2017, 19:34
Помогаю со студенческими работами здесь

Возможно ли преобразовать в число, строку вида:
Если дана строка, например, (1+4+5+7), она может быть преобразована в число?

Определить, целое число ввел пользователь или вещественное
Доброго времени. Нужно определить целое число ввел пользователь или вещественное. Как это можно сделать?

Дано целое число N(>0) и строка S. Преобразовать строку S в строку длинны N следующим образом: если длинна строки S больше Т, то отбросить первые симв
Дано целое число N(>0) и строка S. Преобразовать строку S в строку длинны N следующим образом: если длинна строки S больше Т, то отбросить...


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

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
Отображение реквизитов в документе по условию и контроль их заполнения
Maks 04.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2. Данный документ берёт данные из другого нетипового документа. . .
Фото всей Земли с борта корабля Orion миссии Artemis II
kumehtar 04.04.2026
Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .
Вывод диалогового окна перед закрытием, если документ не проведён
Maks 04.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .
Программный контроль заполнения реквизита табличной части документа
Maks 02.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать контроль заполнения реквизита "ПричинаСписания". . .
wmic не является внутренней или внешней командой
Maks 02.04.2026
Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/
Программная установка даты и запрет ее изменения
Maks 02.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: при создании документов установить период списания автоматически. . .
Вывод данных в справочнике через динамический список
Maks 01.04.2026
Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2. Задача: вывести данные из ТЧ нетипового документа. . .
Программное заполнения текстового поля в реквизите формы документа
Maks 01.04.2026
Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru