begin
var s:=ReadlnString;
if slt;gt;s.MatchValue([01]+) then Write(не );
Writeln(двоичное число)
end.
Пример
010101111011
двоичное число
begin
var s:=ReadlnString;
if slt;gt;s.MatchValue([+-]d+.d+) then Write(не );
Writeln(дробное число)
end.
Пример
12.54
дробное число
begin
var s:=ReadlnString;
s.Matches(s([+-]d)s).Select(t-gt;Trim(t.Value)).Println;
end.
Пример
123.3 15 -11.7 +21 23.2 51 9 182
15 +21 51
Источник: otvechu.com
При помощи регулярных выражений:
1. Написать программу, которая проверяет, является ли введенная с клавиатуры строка двоичным числом.
2. Написать программу, которая проверяет, является ли введенная с клавиатуры строка дробным числом.
3. Дана строка. Написать программу, которая находит в строке и выводит на экран только двузначные числа.
Решение задачи «Это степень двойки?»
Ответы 1
// PascalABC.NET 3.2, сборка 1437 от 03.05.2017// Внимание! Если программа не работает, обновите версию!begin var s:=ReadlnString; if s<>s.MatchValue(‘[01]+’) then Write(‘не ‘); Writeln(‘двоичное число’)end.Пример010101111011двоичное числоbegin var s:=ReadlnString; if s<>s.MatchValue(‘[+-]?d+.d+’) then Write(‘не ‘); Writeln(‘дробное число’)end.Пример12.54дробное числоbegin var s:=ReadlnString; s.Matches(‘s([+-]?d)s’).Select(t->Trim(t.Value)).Println;end.Пример123.3 15 -11.7 +21 23.2 51 9 18215 +21 51
Источник: znanija.site
Написать программу которая проверяет является ли введенная с клавиатуры строка двоичным числом
Вопрос по информатике:
При помощи регулярных выражений:
1. Написать программу, которая проверяет, является ли введенная с клавиатуры строка двоичным числом.
2. Написать программу, которая проверяет, является ли введенная с клавиатуры строка дробным числом.
3. Дана строка. Написать программу, которая находит в строке и выводит на экран только двузначные числа.
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок — бесплатно!
- bookmark_border
- 27.07.2016 18:20
- Информатика
- remove_red_eye 585
- thumb_up 30
Ответы и объяснения 1
kermusthate
// PascalABC.NET 3.2, сборка 1437 от 03.05.2017
// Внимание! Если программа не работает, обновите версию!
begin
var s:=ReadlnString;
if ss.MatchValue(‘[01]+’) then Write(‘не ‘);
Writeln(‘двоичное число’)
end.
begin
var s:=ReadlnString;
if ss.MatchValue(‘[+-]?d+.d+’) then Write(‘не ‘);
Writeln(‘дробное число’)
Задача Палиндром на Python (Питон): 10+ вариантов решений
end.
begin
var s:=ReadlnString;
s.Matches(‘s([+-]?d)s’).Select(t->Trim(t.Value)).Println;
end.
Пример
123.3 15 -11.7 +21 23.2 51 9 182
15 +21 51
- 28.07.2016 07:25
- thumb_up 24
Знаете ответ? Поделитесь им!
Как написать хороший ответ?
Чтобы добавить хороший ответ необходимо:
- Отвечать достоверно на те вопросы, на которые знаете правильный ответ;
- Писать подробно, чтобы ответ был исчерпывающий и не побуждал на дополнительные вопросы к нему;
- Писать без грамматических, орфографических и пунктуационных ошибок.
Этого делать не стоит:
- Копировать ответы со сторонних ресурсов. Хорошо ценятся уникальные и личные объяснения;
- Отвечать не по сути: «Подумай сам(а)», «Легкотня», «Не знаю» и так далее;
- Использовать мат — это неуважительно по отношению к пользователям;
- Писать в ВЕРХНЕМ РЕГИСТРЕ.
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи — смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Источник: online-otvet.ru