Turbo Pascal
10-11 класс
|
Массив p(15) заполнить целыми случайными числами в диапазоне от 3 до 103. Построить массив К(?) из таких элементов P, которые меньше среднего арифметического C всех элементов массива P. Массив K заполнить плотно. Вывести P, K, C.
Другие вопросы из категории
составить программу: заполнить массив T(4,4): на главной диагонали элементы =0, остальные по формуле I-J. найти сумму элементов в четный столбцах
описание массива TYPE mas: array [-10..-2] byte; var c:mas; укажите: 1) имя массива 2)имя типа 3)размерностость 4)тип и значение индекса 5)тип элемента 6)имя 2-ого элемента
решение Даша записалась на кружок рисования и первым ее заданием стало нарисовать красивые горы Алматы. В Алматы имеется N гор, и каждую можно представить в виде равнобедренного, прямо- угольного треугольника с гипотенузой, расположенной на оси x (смотрите рисунок). Даша ограничена в средствах, поэтому она хочет узнать точное количество краски, которое ей понадобится. Помогите Даше, найдите площадь гор, для того чтобы рассчитать количество необходимой краски.
Вычислите значение переменной S после выполнения фрагмента программы на языке программирования Turbo Pascal: S := 1; a := 2; b := 3; c := 4; if (S > b) or (b > a) then S := a else S := b; S := S + c;
В заданой матрице размер которой указывает пользователь, а элементы образуются случайным образом: посчитать количество столбцов, в которых одинаковые суммы элементов.
Читайте также
Задание1.Вычислить заданное выражение для данных a, b используя оператор IF. Результат Х – введите вещественный тип данных
a*b-1,если a>b,
(a-5)/b,если a>b
X=
Задание 2. Вычислить заданное выражение для данных a, b используя, оператор
правильный ответ и ввести его номер.Ниже представлен рекомендуемый вид экрана во время работы программы (данные, введенные пользователем, выделены полужирным шрифтом).
Архитектор Исаакиевского собора:
1. Доменико Трезини
2. Огюст Монферран
3. Карл Росси
Введите номер правильного ответа и нажмите <Enter>
= 2
Правильно.
Архитектор Исаакиевского собора - Огюст Монферран
на языке Turbo Pascal
y=2ctg3x-
распешите все действия что писать плиз.