Используя функцию нахождения минимума двух чисел, составьте программу ,
10-11 класс
|
которая из трех введенных цифр составляет наименьшее трехзначное число.
Пожалуйста помогите, очень прошу
P.S. Благодарность и лучший ответ не помешает.
Ну не сильно отличается от предыдущего решения
uses crt;
var a,b,c,d,x,q:integer;
begin
readln(a,b,c);
for x:=1 to 3 do
begin
if a>b then begin
q:=a;
a:=b;
b:=q;
end;
if b>c then begin
q:=b;
b:=c;
c:=q;
end;
end;
d:=100*a+10*b+c;
writeln(d);
end.
Другие вопросы из категории
самого длинного слова в тексте.
Найти самое
длинное слово в тексте. Если таких слов несколько, то взять последнее.
Написать на Паскале
1)Катя скачивает видеоклип из интернета в течение 3 минут. Качество связи при этом 512 Кбит/сек.
Вычислите информационный объем видеофрагмента и выразите его в мегабайтах. (Ответ - до сотых)
2)На каждой из 200 страниц книги содержится примерно 800 символов. Выразите в килобайтах
Читайте также
Даны
действительные a, b, c, d. Используя функции
поиска максимума двух чисел max и минимума
двух чисел min, получить:
max(a, b)+min(a, b)
+min(c,d)
——————––––—––———
.
max(a, b, c, d) + min(a,b,c)
действительные a, b, c, d. Используя функции
поиска максимума двух чисел max и минимума
двух чисел min, получить:
max(a, b)+min(a, b)
+min(c,d)
——————––––—––———
.
max(a, b, c, d) + min(a,b,c)
Напишите программу, которая вычисляет НОК двух чисел. Используйте функцию.
2. Составить программу для упорядоченное двух элементов по убыванию.
только элементы кратные 2
3)Найти сумму первых пяти элементов
Составить программу Дан массив целых чисел , размерность -12
1) Заполнение массива производить случайными числами из диапозона [-10;35]
2)Вывести на печать только положительные элементы
3)Найти количество отрицательных элементов
Составить программу
Известны данные о выпуске прождукции ( ткани в метрах ) ткацким цехом текстильного комбината за каждый день месяца . Определить количество ткани ( метров) произведенных цехом за месяц .