Войти Регистрация Спроси ai-bota

нужно написать программу которая выводит наибольшую цифру в введенном числе.

Ответ:

аннасерб

08.10.2020 00:03

// PascalABC.NET 3.3, сборка 1634 от 14.02.2018
// Внимание! Если программа не работает, обновите версию!

begin
var (n,dmax):=(Abs(ReadInteger('n=')),0);
while n>0 do begin
    var t:=n mod 10;
    if t>dmax then dmax:=t;
    n:=n div 10
    end;
Writeln(dmax)
end.

Пример
n= 2450234
5

0,0(0 оценок)

Популярные вопросы: Информатика

okda2

23.09.2021 17:22

Файл объемом 384 килобайт был передан по сети за 3 секунд. Определите пропускную канала (ответ запишите в килобит/с, единицы измерения указывать не надо)....

Alinakamisarova

05.06.2023 14:08

Скорость передачи данных по каналу связи равна 8 бит / с передача данных заняла 2минуты определите информационных объем переданных данных в кидобобайтах ...

linasokol03

18.07.2022 08:03

40 2. почему современный компьютер называют универсальным электронным программно устройством? 3. в чём суть программного принципа работы компьютера? 4. что такое двоичные данные?...

isheh09ow2mth

22.11.2022 12:12

Для кодирования карт из колоды 36 карт минимально необходимо сколько бит? 5 4 7 6...

alievvusal57vusal

16.06.2021 02:22

Паскаль. с клавиатуры вводится натуральное число x. требуется получить число y, в котором записаны цифры числа x в обратном порядке. например, x=123 y=321. примечание. решите с...

ilyamam07

23.01.2022 18:25

Надо решить на языке паскаля в массиве из 3 строк 4 столбцов найти и вывести на экран. 1)все элементы массива больше 10. 2)минимальный элемент 2 строки. 3)сумму элементов каждого...

mariyasidorova1

04.01.2020 14:34

Информационный объём текста, подготовленного с компьютера, равен 12 Мб. 1символ весит 1 байт. Сколько символов содержит этот текст...

КулБои

10.10.2020 17:27

ДО ТЬНа вході маємо будь-яке число, яке запитується у користувача з повідомлення. Доки це число не перевершуватиме 80 воно буде збільшуватися у 2 рази та виводитися кожне нове...

mita421132

10.09.2020 12:50

до ть написати пару речень про українську кухню.( про борщ . галушки, і пампушки). також потрібно пару речень про англійську кухню .. ів пліз...

юра417

10.09.2020 12:50

Потяг проїхав 2/3 шляху зі швидкістю 96 км/год. з якою швидкістю потяг рухався другою частиною шляху, якщо середня швидкість на всьому шляху становила 72 км/год дуууже треба...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку