Опубликовано 6 лет назад по предмету Информатика от vrskdvdbs

Дано натуральное число N. Вычислить разницу между самой большой и самой маленькой цифрой в записи этого числа.

Ответ

Ответ дан Аккаунт удален

// PascalABC.NET 3.1, сборка 1267 от 10.07.2016
begin
var s:=ReadlnString('Натуральное число:').Distinct;
Writeln('Макcимальная разница в цифрах: ',Integer(s.Max)-Integer(s.Min))
end.

Тестовое решение
Натуральное число: 3456634642452343053000523424136240235341
Макcимальная разница в цифрах: 6
1. Ответ
  
  Ответ дан Аккаунт удален
  
  Напоминаю одно из базовых правил Сервиса: задание не должно тестировать входные данные, если это не оговорено условиями задания.
2. Ответ
  
  Ответ дан Аккаунт удален
  
  Кстати, это же правило действует в заданиях олимпиад, ЕГЭ, ГИА.
3. Ответ
  
  Ответ дан Аккаунт удален
  
  Представляете, сказано, что нужно найти корень уравнения на отрезке a,b, указано, что [a;b] - интервал изоляции корня, а мы начинаем требовать от автора решения проверки, так ли это?
Ответ

Ответ дан vladrus113

var n,ni,ma,mi,i:int64;
nstr:string;
begin
ma:=0;
mi:=10;
read(n);
nstr:=inttostr(n);
for i:=1 to length(nstr) do begin
ni:=strtoint(nstr[i]);
if ni>ma then ma:=ni;
if ni<mi then mi:=ni;
end;
writeln(ma-mi);
end.
1. Ответ
  
  Ответ дан archery
  
  если нет конечно повышенных требований на длину числа
2. Ответ
  
  Ответ дан vladrus113
  
  Ну и ладно. Возможно, я ошибся. Просто на другой версии Паскаля, на которой раньше я учился, частенько выскакивала такая ошибка, при каких то других действиях. Я уже подпривык ставить так

Самые новые вопросы

Математика - 5 лет назад

Решите уравнения: а) 15 4 ∕19 + x + 3 17∕19 = 21 2∕19; б) 6,7x - 5,21 = 9,54

Помогите решить задачи на паскаль.1) дан массив случайных чисел (количество элементов вводите с клавиатуры). найти произведение всех элементов массива.2) дан массив случайных чисел (количество элементов вводите с клавиатуры). найти сумму четных элементов массива.3) дан массив случайных чисел (количество элементов вводите с клавиатуры). найти максимальный элемент массива.4) дан массив случайных чисел (количество элементов вводите с клавиатуры). найти максимальный элемент массива среди элементов, кратных 3.

География - 5 лет назад

Почему япония - лидер по выплавке стали?

Математика - 5 лет назад

Чему равно: 1*(умножить)х? 0*х?

Русский язык - 5 лет назад

В каком из предложений пропущена одна (только одна!) запятая?1.она снова умолкла, точно некий внутренний голос приказал ей замолчать и посмотрела в зал. 2.и он понял: вот что неожиданно пришло к нему, и теперь останется с ним, и уже никогда его не покинет. 3.и оба мы немножко удовлетворим свое любопытство.4.впрочем, он и сам только еле передвигал ноги, а тело его совсем застыло и было холодное, как камень. 5.по небу потянулись облака, и луна померкла.

Дано натуральное число N. Вычислить разницу между самой большой и самой маленькой цифрой в записи этого числа.

Информация