1) составьте программу, которая формирует и выводит на экран последовательность из 15 элементов, заданных датчиком случайных чисел.
Элементы массива должны принадлежать интервалу [10, 30], выполните
сортировку массива.
2) составьте программу, которая формирует и выводит на экран
последовательность из 30 элементов, заданных датчиком случайных чисел.
Элементы массива должны принадлежать интервалу [0, 20], Найдите
количество элементов, равных числу, введенному с клавиатуры, если таких
чисел нет – дать ответ: «таких чисел нет».
var A:array [1..n] of real; {объявление массива А} i:byte; {переменная для циклов} b:boolean; {идентификатор роста}begin writeln('vvedite tselie chisla matrici A[',n,',',n,']'); for i:=1 to n do begin {циклвводавмассив} write('A[',i,'] = '); readln(A[i]); end; writeln; writeln('matraca imeet vid: '); for i:=1 to n do begin {циклвыводамассива} write(A[i]:3:3,' '); end; writeln; b := true; for i:=1 to n-1 do {цикл определения роста} if (A[i] > A[i+1]) then begin {если текущий больше следующего} b := false; {значит масив невозростающий} break; end; if (b) then writeln('Masiv A - vozrostaushaya posledovatelnost''') else writeln('Masiv A - ne vozrostaushaya posledovatelnost'''); readln;
или же можно зайти в панель управления, язык и там выбрать, а можно и пол умолчанию
на Linux (Ubuntu), просто клик вверху панели на значок RU или ENG и меняешь.
или же нажимаешь на знак шестеренки, потом параметры системы, ввод текста, и меняешь
2. Windows внизу на панели, возле времени если кликаешь, то будет тебе часы (по желании можно виджет часов добавить)
также и на Linux, вверху панели на часы нажав