сервис вопросов и ответовЯзык программирования Паскаль. Найти три минимальных цифры в числе.
10-11 класс|
|
7349025
13 июня 2014 г., 15:01:02 (9 лет назад)
Astapovai66
13 июня 2014 г., 15:38:28 (9 лет назад)
uses crt; var a,min: integer; n: longint; begin clrscr; min:=9; write('Vvedite chislo: '); readln(n); a:=n mod 10; repeat if a<min then min:=a; a:=n mod 10; n:=n div 10; until n=0; if a<min then min:=a; write('minimalnaya zifra: ',min); readln end.
Ответить
Другие вопросы из категории
Доска для игры «Бим-бом» - поле размером 8´4
клеточки. Какое минимальное количество бит потребуется для кодирования
координат одного поля такой доски?
c полным решением,пожалуйста
укажите какому из чисел записанному в экспоненциальному виде соответствует число 1620000
а) 1.62Е+8
б) 1.62Е+7
в) 1.62Е+6
г) 1.62Е+5
Читайте также
Помогите, пожалуйста!! Язык программирования Паскаль.
1) Найти количество отрицательных элементов в массиве А [3,8].
2) Заполнит и вывести массив Р [6,7], запросить номер строки и вывести её на экран.
3) Заполнить и вывести массив Р [6,7], запросить номер строки, заменить все её элементы на 5 и вывести новый массив.
4) В квадратной матрице А [10,10] заменить элементы главной диагонали на 0.
Всё нужно очень срочно
Срочно! Дано трехзначное число. Если сумма цифр этого числа превышает 15, то вывести эту сумму. Иначе вывести
произведение цифр этого числа.
Необходимо решение на языке Паскаль. Заранее спасибо!
2) Дан целочисленный массив из 20 элементов, все элементы которого – целые числа в интервале от -1000 до 1000. Опишите на русском языке или на одном из
языков программирования алгоритм, который находит минимальное значение из всех нечетных элементов массива, которые делятся на 5.
помогите решить задачи по информатике на языке программирования паскаль. 1. сумма положительных элементов.
2. количество нулевых элементов.
Вы находитесь на странице вопроса "Язык программирования Паскаль. Найти три минимальных цифры в числе.", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.