Valerevna Tuzova
?>

Напишите процедуру, которая переставляет 4 числа в порядке убывания. паскаль

Информатика

Ответы

Aleks0091
PascalABC.NET 3.4.2, сборка 1884 от 24.11.2018Внимание! Если программа не работает, обновите версию!

procedure ПоУбываниюЧетыреЧисла(var a, b, c, d: real);

begin

 var p := Seq(a, b, c, d).OrderDescending.ToArray;

 (a, b, c, d) := (p[0], p[1], p[2], p[3])

end;


begin

 var (a, b, c, d) := (4.05, -2.5, 0.3, 9.0);

 ПоУбываниюЧетыреЧисла(a, b, c, d);

 Print(a, b, c, d)

end.

Результат9 4.05 0.3 -2.5
korolev-comitet8825
41)Создать новую таблицу
42) Д)
43)Правка - Удалить запись.
50) Параметры.
53)Выводится диалоговое окно с приглашением ввести параметр для условия на отбор записей.
56)Изменяются значения в полях определенных записей.
57)Создается таблица с данными, соответствующими определенным условиям.
62)Автоматической вставки последовательных или случайных чисел в качестве номера новой записи.
65)Во вкладке Режим таблиц – выбрать Вставить 
66)Разные имена, но одинаковый тип данных.
69)Для отбора записей, данные в которых соответствуют определенным условиям.
70)Е)
71)Для создания контрольного переключателя.
len4ik1986

Текстовый редактор Microsoft Word предназначен для набора текста с клавиатуры, а также редактирования, копирования, создания таблиц, одним словом для того, чтобы созданный Вами документ выглядел максимально привлекательно, стильно и информативно. С вы можете составить такие документы как:

оформить курсовую или дипломную работу;

составить резюме кандидата на должность;

напечатать заявление о приеме на работу;

подготовить многомиллионный договор на поставку товара;

сочинить и отредактировать для печати целый роман.

Другими словами, текстовый редактор Microsoft Word, будет полезен абсолютно любому пользователю компьютера, который так или иначе связан с текстовыми документами.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Напишите процедуру, которая переставляет 4 числа в порядке убывания. паскаль
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

mustaevdmitry397
Stryapunina
mstrshulz
olartamonov6
Юлия1972
maksteks
Tkachenko1050
ranocchio6
Давид-Ольга
vetrov1
КузменковаЖигулин
olgabylova6223
Vuka91
emilbadalov
ПолухинаТененева565
▲