Автор RaperR7 задал вопрос в разделе Другие языки и технологии
Организовать ввод одномерного массива и получил лучший ответ
Ответ от Ѓдачник[гуру]
Вот что удалось найти
Динамические массивы в Паскале. Динамические массивы в Паскале не имеют заранее определенного размера. Размер динамических массивов может изменяться. Пример создания динамического массива в Паскале:
type TIntMassiv = array of Integer;
var intMassiv: TIntMassiv;
Здесь создан новый тип TIntMassiv, это динамический массив, его размер не известен, и переменная данного типа intMassiv.
Размер динамического массива неизвестен, но для работы с таким массивом размер надо установить. Устанавливают размер динамического массива в Паскаль с помощью функции SetLength
SetLength(intMassiv, 2);
Здесь установлен размер два для массива intMassiv.
Соответственно, в своей программе ты пишешь:
program z5;
type TIntMassiv = array of real;
var A: TIntMassiv;
var max,min,s:real;
i: integer;
begin
writeln ('Введите размер массива: ');
readln (n);
SetLength (A, n);
writeln ('vvedite elementi massiva');
И дальше идёт твоя программа
попробуй завести массив на допустим 1000 элементов, но использовать только первые 20(число которое ты введешь с клавы) . реадлн (н) или как вариант погугли на тему динамические массивы в паскале
для таких случаев пользуются динамической памятью
var: n:integer;
a:array of real;
max,min,s:real;
i: integer;
begin
writeln('введите размерность массива');
readln(n);
setlehgth(a,n);
writeln ('vвведите элемент массива');
for i:=1 to n do
readln (a);
for i:= 1 to n do
max:=a[1];
min:=a[1];
for i := 2 to n do
begin
if (a<min)>;
if (a>max) then max:=a;
end;
for i:= 1 to n do
s:=0;
for i:= 1 to n do
begin
S:=s+a;
end;
S:=(S-max-min)/(n-2);
writeln ('Srednearefmeti4eskoe bez max i min=',S:10:4);
readln
end.
паскаль матрица
Программирование — это искусство!
В нём всё должно быть красиво и понятно:
var
A
подробнее...
Упорядочить массив по возрастанию методом Шелла.
Когда-то давно писал алгоритм сортировки. Тебе для образца:
#include
#include
Ввод массива с клавиатуры C++
int* arr = nullptr;
int sz = 0;
void add( int i ){
int* new_arr = new
подробнее...
Напишите пожалуйста поподробнее, что значит Convert.ToInt32(Console.ReadLine() при запросе размерности массива в C#!!??
Означает, что вы вводите в консоли в данном месте число, но оно считывается как строка, конечно же.
подробнее...
Одномерные массивы на паскале
не вводя с клавиатуры:
var i:integer;
MAS: array [1..12] of integer;
begin
for
подробнее...
ввод вывод в Паскале?
Для массива короче в цикле:
for N := 1 to SizeArray do begin Write(\'Введите X[\', N, \'] =
подробнее...
помогите пожалуста решить задачу на массивы в кумире.
алг Массив (арг цел N, рез цел K,S)
нач цел таб A[1:100,1:100], цел i,j
K:=0
S:=0
подробнее...
Сортировка одномерного массива
Доброго времени суток.
Странная какая-то сортировака у вас. Вот пример сортировки пузырьком.
подробнее...
Excel-вопрос. Вводятся имена людей. Нужно посчитать количество имён. Какую функцию надо применить?
СЧЁТЗ
Подсчитывает количество непустых значений в списке аргументов. Функция СЧЁТЗ
подробнее...
подскажите, как в EXCEL найти сумму (разность) двух массивов
Такая же матричная операция как и все остальные
На примере 1-й массив в a1:b2, 2-й массив в
подробнее...
что такое размерность массива(QBasic)???
число индексов для доступа к элементу массива. Например вектор - один индекс a, матрица - два
подробнее...
массивы в C++
Решать за тебя не буду, но подскажу на будущее, как делать проще. Ты массив из 100 элементов
подробнее...
работа с abc pascal. массивы
Массивы - это совокупности однотипных элементов. Характеризуются они следующим:
каждый
подробнее...
Вопрос по Паскалю
Вводится дата (день, месяц, год) необходимо посчитать сколько дней прошло с начала года.
Доброго времени суток.
И какая проблема? Объявляете константу и функцию, которая
подробнее...
Как сделать в VBA ввод и вывод массива?А именно в этой процедуре?
Этот код полностью не рабочий. Даже можно сказать, что это нечто похожее на VBA.
Ввод делается
подробнее...