сервис вопросов и ответовПомогите, пожалуйста, написать программы!)
10-11 класс|
|
Заполнить массив из 15 элементов случайным образом:
1. вещественными значениями x (22<x<23)
2. вещественными значениями x (0<x<10)
3. вещественными значениями x (-50<x<50)
4. вещественными значениями, лежащими в диапазоне от 0 до 1
Faso1
01 июля 2013 г., 0:56:13 (10 лет назад)
Vanya123
01 июля 2013 г., 2:50:14 (10 лет назад)
Фрагмент программы:
var
i: integer;
a: array[1..15] of real;
begin
for i := 1 to 15 do
a[i] := Random + 22;
{ Или вместо предыдущей строчки подставьте одну из следующих:
a[i] := 10 * Random;
a[i] := 100 * Random - 50;
a[i] := Random;
}
{
Тут все что еще надо
}
end.
Streltsova
01 июля 2013 г., 4:44:18 (10 лет назад)
В Паскаль вызов Random без аргументов возвращает случайное вещественное число на [0;1]. Необходимые диапазона получаются нормированием (если так понятнее - "масштабированием") числа на нужный диапазон. Сначала умножаем на разницу между верхней и нижней границей диапазона, а потом к результату прибавляем нижнюю границу. Так, для [22;23] это будет 1*Random+22 или просто Random+22. Для [0;10] будет 10*Random, для [-50;50] получаем 100*Random-50
Ответить
Другие вопросы из категории
Система DNS предназначена для:
1.обеспечения маршрутизации коммутационных пакетов
2.обеспечения устойчивости работы сети
3.преобразования числовых IP-адресов в буквенные
4.преобразования буквенных адресов в числовые
Трехзначное число, записанное в шестнадцатеричной системе счисления, увеличива-ется вдвое от перестановки первой цифры в конец числа. Определите
максимальное из таких чисел, записанное в системе счисления по основанию 16.
1) В массиве из 11 действительных чисел, введённых с клавиатуры, найти номер первого положительного элемента и выдать на экран этот элемент или сообщение
о том, что в массиве положительных элементов нет.
прошу вас решите!
Читайте также
написать программу на Assembler
добрый вечер, всем. помогите, пожалуйста, написать программу на Ассемблере.
задание:
Создать программу на языке Ассемблер, что позволяет организовать вычисления над элементами массивов
Объединить два массива 8-битных целых чисел со знаком. Сначала элементы второго затем первого.
заранее огромное спасибо всем!
программа на C++ в визуальном режиме (есть несколько вариантов кода программы)
доброй ночи, уважаемые программисты и успевающие в учебе студенты. помогите, пожалуйста, написать программу на C++ (в визуальной вкладке).
ВОТ ЗАДАНИЕ:
дано три переменные вещественного типа. если их значения упорядочены по возрастанию или убыванию, то удвоить их; иначе заменить значение каждой переменной на противоположное. вывести значения переменных.
я прикрепила несколько тестовых файлов (блокнот) в которых есть несколько вариантов решение этого задание (то есть коды программ), а вы скажите какой из них лучше всего подходит, а также скажите какие компоненты нужно кинуть на форму-дизайн (то есть какие кнопки, и что на них писать). в этих 3 файлов есть написанный код программы, нужно написать: на какие кнопки что писать и какой вариант решение больше подходит.
заранее огромное спасибо всем за помощь!!!
Помогите, Пожалуйста, с программой Паскаль. Рассмотрим целочисленный массив А[1..N] при N <= 100.
Написать программу, которая вычисляет среднее арифметическое элементов с четными индексами и среднее арифметическое с нечетными индексами.
Ввод: Число N и элементы массива вводятся из Файла.
Вывод: В файл должны быть введены 2 вычисленных значения
Помогите пожалуйста написать программу в паскале.
Составить программу перевода натурального числа из десятичной системы счисления в двоичную
помогите пожалуйста написать программу!!!СРОЧНО!!!
в одномерном массиве все отрицательные элементы заменить модулем, а положительные заменить числом 888
Вы находитесь на странице вопроса "Помогите, пожалуйста, написать программы!)", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.