Информатика | 10 - 11 классы
Задача : найти самую большую цифру целого числа.
В турбо паскаль.
Паскаль?
Паскаль.
Найти все двузначные числа, такие, что сумма цифр равна A, а само число делится на B.
Определите сумму четырехзначного числа в программме турбо паскаль?
Определите сумму четырехзначного числа в программме турбо паскаль.
Турбо паскаль :Составить главную программу и функцию?
Турбо паскаль :
Составить главную программу и функцию.
В функции
для двух векторов А(N) и В(М), состоящих из целых чисел, найти самое большое
число, которое имеется в обоих векторах.
Написать в Турбо Паскале программу : Задано 3 - х значное число X?
Написать в Турбо Паскале программу : Задано 3 - х значное число X.
Найти разность между этим числом и числом, записанным теми же цифрами, но в другом порядке.
(Видимо в обратном порядке?
).
Найти самую большую цифру целого числа в QBasic?
Найти самую большую цифру целого числа в QBasic.
1. Найти самую большую цифру целого числа?
1. Найти самую большую цифру целого числа.
Решите пожалуйста задачу в паскаль?
Решите пожалуйста задачу в паскаль.
Найти все целые двузначные числа, сумма цифр в которых равна 8.
СРОЧНО?
СРОЧНО!
Решение делается в турбо паскале : "Вывести на экран все четырехзначные числа, в записи которых нет одинаковых цифр!
".
Задача по информатике?
Задача по информатике.
Найти сумму цифр данного целого числа.
Программа.
Паскаль.
Даны три цифры?
Даны три цифры.
Вывести самое большое трехзначное число из этих цифр.
Паскаль.
Дам 25 балов.
Вы открыли страницу вопроса Задача : найти самую большую цифру целого числа?. Он относится к категории Информатика. Уровень сложности вопроса – для учащихся 10 - 11 классов. Удобный и простой интерфейс сайта поможет найти максимально исчерпывающие ответы по интересующей теме. Чтобы получить наиболее развернутый ответ, можно просмотреть другие, похожие вопросы в категории Информатика, воспользовавшись поисковой системой, или ознакомиться с ответами других пользователей. Для расширения границ поиска создайте новый вопрос, используя ключевые слова. Введите его в строку, нажав кнопку вверху.
Program bigDigit ;
var n, maxdig : integer ;
begin maxdig : = 0 ; readln(n) ; if (n < ; 0) then n : = - n ; while n > ; 0 do begin if (n mod 10 > ; maxdig) then maxdig : = n mod 10 ; n : = n div 10 ; end ; writeln(maxdig) ;
end.