Как в паскале удалить цифру из числа? Какая для этого команда? :)
5-9 класс
|
var a,b:integer;
c:string;
begin
read(a,b);
while (a<>0) do begin
if a mod 10 <> b then c+=inttostr(a mod 10);
a:=a div 10;
end;
for a:=length(c) downto 1 do
write(c[a]);
end.
нет такой функции, какая задача?
Дано натуральное число а. Удалить все цифры b, введенные с клавиатуры.
Другие вопросы из категории
МЕЖДУ ДВУМЯ ОБЪЕКТАМИ, ОТНОШЕНИЕ МЕЖДУ ОБЪЕКТОМ И МНОЖЕСТВОМ ОБЪЕКТОВ, ОТНОШЕНИЕ МЕЖДУ ДВУМЯ МНОЖЕСТВАМИ ОБЪЕКТОВ
дежурит Сеня Сенечкин»?
количество элеменнтов с нечетными значениями
Дано 7 чисел . Определить кол - во чисел меньших 0 , произведение положительных чисел и вывести их на экран , сумму отрицательных чисел .
Читайте также
синяя,у Маши-не синяя,а у Вари-не белая". Впоследствии выяснилось что в ответе верно сказано о цвете флешки только одной девочки. Какого цвета флешка у каждой из девочек? СПАСИБО ЗАРАНЕЕ!
распределились между победителями, то мнения разошлись.
Даша сказала: "Андрей был первым, а Володя - вторым".
Галя утверждала: "Андрей был вторым, а Борис - третьим".
Лена считала: "Борис был четвертым, а Сергей - вторым".
Ася, которая была судьей на этих соревнованиях и хорошо помнила, как распределились места, сказала, что каждая из девочек сделала одно правильное и одно неправильное заявление.
Кто из мальчиков какое место занял?
Пожалуйста,если можно показать,как решалась задача)
перестановкой цифр исходного числа.
Составьте программу:
Дано 5-ти значное число (78906)
с помощью div и mod
нужно выделить цифры из числа.
есть ли в трёхзначном числе два одинаковых цифры