Предмет: Информатика, автор: varya0505

Упростите пожалуйста эту прогу по информатике, работаем в Pascal.
Надо найти минимальное из 3 чисел)

Приложения:

Ответы

Автор ответа: Аноним

0

// PascalABC.NET 3.4.2, сборка 1814 от 02.10.2018

// Внимание! Если программа не работает, обновите версию!

begin

var (a, b, c) := ReadReal3;

Min(Min(a, b), c).Println

end.

Аноним: Короче вряд ли напишут, если без последовательностей. А с ними можно: begin ReadSeqReal(3).Min.Println end. - и это все.

varya0505: Спасибо тебе, чел

Предыдущий вопрос

Следующий вопрос

Похожие вопросы

Предмет: Информатика, автор: vladbulgakov992

ПИТОН
Задание 1
Составить программу для вывода на экран фрагмента таблицы умножения на 5. На экране должен появляться столбик строк вида:

1 * 5 = 5
2 * 5 = 10
.......
10 * 5 = 50
Примечание: числа 1... 10 - это значения параметра цикла, второй сомножитель - число, вводить его не нужно. Произведение вычисляется по формуле 5*i и выводится прямо в операторе print.

Задание 2.
Найти и вывести на экран сумму всех целых чисел от 8 до 15.
Примечание: указанные числа являются минимальным и максимальным значениями параметра цикла i.

6 лет назад

Предмет: Алгебра, автор: rzaevruslan2007

2) Реши задачу с помощью уравнения.
Моторная лодка прошла 100 км по течению реки 32 км против течения, затратив на
весь путь 7 ч. Скорость течения реки равна 2км/ч. Найди собственную скорость
лодки. /5 баллов/

6 лет назад

Предмет: Русский язык, автор: bozbanbajmiras7

Бродить (по)старинному замку, нарядиться (по)старинному, идти (по)прежнему пути, жить (по)прежнему, говорить (по)другому вопросу, переделать (по)другому, (по)осеннему небу плывут облака, сегодня (по)осеннему зябко и сыро, (по)нашему двору, вышло (по)нашему.

6 лет назад

Предмет: Химия, автор: ововлв

какая химическая реакция протикает при горении древисины?

9 лет назад

Предмет: Математика, автор: sabina149

Длина веревки 16 м . Отрезали 1.4 часть веревки. Какова длина оставшейся веревки

9 лет назад