сервис вопросов и ответовPascal. Написать программу: нахождения цифры в числе с максимальным значением.
5-9 класс|
|
9й класс.
Alyonamelnik
07 нояб. 2014 г., 18:03:50 (9 лет назад)
Dimon228148
07 нояб. 2014 г., 20:11:39 (9 лет назад)
uses crt;
var a,Max,x:integer;
begin
clrscr;
Write('Введите число: ');
readln(a);
Max:=a mod 10;
while a>0 do
begin
x:=a mod 10;
a:=a div 10;
if x>Max then Max:=x;
end;
Writeln('Максимальная цифра: ',Max);
readln;
end.
Ответить
Другие вопросы из категории
СРОЧНООО!!!
составить программу и блок схему для нахождени суммы 2х положительных чисел при условии, что запрашиваются любые числа
Помогите пожалуйста решить задачу :
Сообщение составлено с помощью 32 символьного алфавита , содержит 80 символов .
другое сообщение составлена с использованиие 64 символьного алфавита, и содержит 70 символов.
Вопрос: сравните обьемы информации содержащиеся в сообщениях?
Читайте также
Помогите написать программу для Паскаля.
1. Написать программу нахождения произведения n чисел.
1. Даны два различных вещественных числа X и Y. Написать программу, возведения наименьшего из чисел в квадрат, наибольшего – в куб и нахождения среднего
арифметического полученных значений.
2. За весну Обломов похудел на p1 кг, за лето поправился на p2 кг, за осень похудел на p3 кг, за зиму поправился на p4 кг. Написать программу, определяющую, похудел или поправился за год Обломов.
3. Написать программу, которая определяет, является ли целое число четным двузначным числом.
4. Даны коэффициенты квадратного уравнения. Написать программу, определяющую его корни
Пожалуйста помогите решить желательно все или хотя бы одну (P.S. программа для программы Turbo Pascal) 1.Написать программу, которая предлагает
ввести 3 значное число и находит сумму его цифр.
2. Написать программу, которая предлагает ввести 3 значное число и меняет порядок цифр наоборот. (123- 321)
3.Написать программу, которая предлагает ввести три числа с клавиатуры, находит их сумму, произведение и среднее арифметическое.
Написать программу для определения максимального числа из данных пяти чисел.
Пользователь вводит пять чисел. Программа выводит ответ: "Максимальное число ... ".
Написать программу в "КуМиРе"
1.Дано целое число N.Написать программу ,увеличивающую число в 3 раза ,если оно больше нуля
2.Дано целое число N.Написать программу ,заменяющую его нулём ,если больше или равно нулю,и увеличивающая его в 2 раза ,если число меньше нуля.
3 .Дано целые числа a и b .Написать программу , которая выводит сначала большее число ,затем меньшее.
4.Даны числа a,b,c.Написать программу ,выводящую их в возрастающем порядке.
ПЛИЗ ПОМОГИТЕ
Вы находитесь на странице вопроса "Pascal. Написать программу: нахождения цифры в числе с максимальным значением.", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.