Заполнить массив из элементов случайными числами в интервале [-15..15] и найти в нем максимальный и минимальный элементы и их номера. Язык паскаль Написать программу.
1. Число элементов массива задаете индивидуально.
2.Перед выводом массива вывести на экран, что надо найти в задаче и характеристики массива.
3. Вывод результата согласно примеру.
4. Добавить комментарий к каждой строке программы.
Пример:
Исходный массив:
4 -5 3 10 -4 -6 8 -10 1 0
максимальный a[4]=10
минимальный a[8]=-10
чем подробней тем лучше, например
зайти в кладовку
взять веник
взять совок
выйти из кладовки
пройти в помещение, которое необходимо подмести
движениями слева направо сметать мусор в сторону (многократно, пока все помещение не будет подметено)
собрать мусор веником в одну кучку
кучку мусора веником замести на совок
подойти к мусорному ведру
высыпать мусор из совка в мусорное ведро
пройти в кладовку и поставить на место веник и совок
как то так.. степень подробности выбирайте сами
// 1.
[<EntryPoint>]
let main argv =
let mutable x = System.Console.ReadLine() |> System.Double.Parse
if x > 0.0
then x <- x+5.0
printf "%f" x
System.Console.ReadKey true |> ignore
0
// 2.
// F#
[<EntryPoint>]
let main argv =
let mutable x = System.Console.ReadLine() |> System.Double.Parse
let mutable y = System.Console.ReadLine() |> System.Double.Parse
if x > y
then x <- x*4.0; y <- y+4.0;
else y <- y*4.0; x <- x+4.0;
printf "x: %f\ny: %f" x y
System.Console.ReadKey true |> ignore
0