Поменять порядок следования цифр в данном естественном числе N на оборотный,
Поменять порядок следования цифр в данном естественном числе N на обратный, удалив при этом из записи получаемого числа все вхождения цифры k
Задать свой вопрос2 ответа
Тончикова
Анастасия
// PascalABC.NET 3.0, сборка 1139 от 10.01.2016
begin
var s:=ReadLnString('Введите естественное число');
var k:=ReadChar('Введите знак для исключения');
s.Where(x-gt;x in ['0'..'9']).Reverse.Where(x-gt;xlt;gt;k).PrintLn('')
end.
Тестовые решения
- сначала корректное число:
Введите естественное число 23610645311065462546320
Введите знак для исключения 6
023452450113540132
- а сейчас число, замусоренное различными знаками:
Введите натуральное число 1234 разорвем2356-783+342\1421453!!!
Введите символ для исключения 3
5412412487652421
begin
var s:=ReadLnString('Введите естественное число');
var k:=ReadChar('Введите знак для исключения');
s.Where(x-gt;x in ['0'..'9']).Reverse.Where(x-gt;xlt;gt;k).PrintLn('')
end.
Тестовые решения
- сначала корректное число:
Введите естественное число 23610645311065462546320
Введите знак для исключения 6
023452450113540132
- а сейчас число, замусоренное различными знаками:
Введите натуральное число 1234 разорвем2356-783+342\1421453!!!
Введите символ для исключения 3
5412412487652421
Хамани
Семик
//Вариант без местного оккультизма
//Pascal ABC.NET v3.0 сборка 1111
var
s:string;
c:char;
i:integer;
begin
writeln('Введите число:');
readln(s);
writeln('Введите исключение:');
readln(c);
for i:=length(s) downto 1 do
if s[i]lt;gt;c then write(s[i]);
end.
Пример исполненья:
Введите число:
1234
Введите исключение:
3
421
//Pascal ABC.NET v3.0 сборка 1111
var
s:string;
c:char;
i:integer;
begin
writeln('Введите число:');
readln(s);
writeln('Введите исключение:');
readln(c);
for i:=length(s) downto 1 do
if s[i]lt;gt;c then write(s[i]);
end.
Пример исполненья:
Введите число:
1234
Введите исключение:
3
421
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
Грузовой автомобиль марки краз за одну поездку может доставить 7.500 кирпичей
Математика.
Определить предложения какие они по цели высказывания и по интонации
Русский язык.
"Три толстяка" Называли эту площадь Площадью Звезды последующей причине.
Русский язык.
на одной грядке коротышки посадили 3 ряда морковок по 8 штук
Разные вопросы.
эссе на тему какое образование дается в каждой семье
Қазақ тiлi.
Put the verb in brackets into the Present Indefinite.
1The Volga ,
Английский язык.
Сколько стоит коктейль молочный? Точную цену надо?
Математика.
Составить рассказ Из чего складывался культ монарха помазанника Божьего?
История.
задание экономиоти
Рассмотри ситуацию: человек живёт на Крайнем Се-вере. С помощью каких
Экономика.
Человек живет на Крайнем Севере. С помощью каких благ удовлетворяются потребности
Экономика.
Облако тегов