Question

Информатика Срочно Дано четырёхзначное число ,найти наибольшую цифру в записи этого числа

Answer 1

program vld;

var a,b,c,max: integer;

begin

readln(b);

min:=9;

max:=0;

repeat

begin

c:=b mod 10;

b:=b div 10;

if c>max Then max:=c;

end;

until b<=0;

writeln('Наибольшее значение:',max);

end.

Answer 2

Хорошо! Чтобы найти наибольшую цифру в записи четырехзначного числа, вам нужно последовательно сравнивать каждую цифру с предыдущей найденной наибольшей цифрой и обновлять наибольшую цифру при необходимости. Вот алгоритм для выполнения этой задачи:

1. Инициализируйте переменную max_digit значением нуля. Эта переменная будет содержать наибольшую найденную цифру.
2. Считайте четырехзначное число.
3. Разделите число на отдельные цифры. Вы можете использовать операцию целочисленного деления и остаток от деления для этого.
   • Например, если число равно 1234, вы можете разделить его следующим образом:
     • first_digit = 1234 // 1000 (первая цифра равна 1)
     • second_digit = (1234 // 100) % 10 (вторая цифра равна 2)
     • third_digit = (1234 // 10) % 10 (третья цифра равна 3)
     • fourth_digit = 1234 % 10 (четвертая цифра равна 4)
4. Сравните каждую цифру с текущим значением max_digit и обновите max_digit, если найдена большая цифра.
5. Выведите значение max_digit.

Вот пример реализации алгоритма на языке Python:

pythonCopy code
number = int(input("Введите четырехзначное число: "))
max_digit = 0

first_digit = number // 1000
second_digit = (number // 100) % 10
third_digit = (number // 10) % 10
fourth_digit = number % 10

if first_digit > max_digit:
    max_digit = first_digit
if second_digit > max_digit:
    max_digit = second_digit
if third_digit > max_digit:
    max_digit = third_digit
if fourth_digit > max_digit:
    max_digit = fourth_digit

print("Наибольшая цифра в числе:", max_digit)

Вы можете запустить этот код, ввести свое четырехзначное число и получить наибольшую цифру в числе.