Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Форум программистов и сисадминов Киберфорум > Форум программистов > Pascal (Паскаль) > Pascal ABC
Войти
Регистрация
Восстановить пароль
Правила Карта форума Темы раздела Блоги Социальные группы Поиск Сообщения за день  
Другие темы раздела
Pascal ABC Определение максимального значения чисел последовательности, удовлетворяющих некоторому условию Определение максимального значения чисел последовательности, удовлетворяющих некоторому условию При этом возможны два случая: 1) точно известно, что числа, удовлетворяющие заданному условию, в обрабатываемой последовательности имеются; 2) чисел, удовлетворяющих заданному условию, в обрабатываемой последовательности может и не быть. В первом случае задача решается следующим образом:... https://www.cyberforum.ru/ pascalabc/ thread918394.html Pascal ABC Сортировка вставками
Здравствуйте, помогите пожалуйста, нужно написать программу сортировки одномерного массива по заданным алгоритмам Функция поиск места имеет вид: алг цел ПоискМеста( арг цел таб а(0:n),цел i нач цел m |Текущее значение искомой величины m:=1 нц пока a<a m:=m+1 кц знач:=m | Значение функции
Pascal ABC Разделить элементы k-й строки матрицы на диагональный элемент, расположенный в этой строке Заданы матрица порядка n и число k. Разделить элементы k-й строки на диагональный элемент, расположенный в этой строке. https://www.cyberforum.ru/ pascalabc/ thread918282.html Pascal ABC Сформировать два массива из четных и нечетных элементов исходного Задан массив с количеством элементов N. Сформировать два массива: в первый включить элементы исходного массива с четными номерами, а во второй — с нечетными. https://www.cyberforum.ru/ pascalabc/ thread918240.html
Записать в файл первые N простых чисел Pascal ABC
Записать в файл первые N простых чисел. Program z9; var f:text; n,i, k : integer; x:real; prostoe:boolean; function prost(x:integer): boolean; var i,b:integer; begin prost:=true; 		Pascal ABC Подсчитать количество положительных элементов массива, стоящих на нечетных местах Задачи на одномерные массивы 5 В одномерном числовом массиве размерности n подсчитать количество положительных элементов, стоящих на нечетных местах. https://www.cyberforum.ru/ pascalabc/ thread918180.html
Pascal ABC В одномерном числовом массиве размерности n вычислить сумму элементов, расположенных между максимальным и минимальным элементами https://www.cyberforum.ru/ pascalabc/ thread918179.html
Задачи на одномерные массивы 4 В одномерном числовом массиве размерности n вычислить сумму элементов, расположенных между максимальным и минимальным элементами. 		Pascal ABC Удалить из одномерного числового массива размерности n все отрицательные элементы
Задачи на одномерные массивы 3 Удалить из одномерного числового массива размерности n все отрицательные элементы.
Pascal ABC Создать новый одномерный массив, элементами которого являются элементы исходного, не превосходящие некоторого числа https://www.cyberforum.ru/ pascalabc/ thread918177.html
Задачи на одномерные массивы 2 Из одномерного числового массива размерности n создать новый одномерный массив, элементами которого являются элементы исходного, не превосходящие некоторого заданного числа. 		Pascal ABC В одномерном числовом массиве размерности n найти произведение элементов, расположенных до первого отрицательного элемента Задачи на одномерные массивы 1 В одномерном числовом массиве размерности n найти произведение элементов, расположенных до первого отрицательного элемента. Множественные задания в одной теме запрещены правилами форума. Ваши остальные вопросы вынесены в отдельные темы: 2) https://www.cyberforum.ru/pascalabc/thread918177.html 3) https://www.cyberforum.ru/pascalabc/thread918178.html 4)... https://www.cyberforum.ru/ pascalabc/ thread918156.html
Нарисовать слона Pascal ABC
нарисовать слона 		Pascal ABC Записи. Что не правильно ? На вход программы подаются сведения о результатах соревнований по школьному многоборью. Многоборье состоит из соревнований по четырем видам спорта, участие в каждом из которых оценивается баллами от 0 до 10 (0 баллов получает ученик, не принимавший участия в соревнованиях по данному виду спорта). Победители определяются по наибольшей сумме набранных баллов. Известно, что общее количество... https://www.cyberforum.ru/ pascalabc/ thread917900.html
3030 / 1916 / 1649
Регистрация: 30.04.2011
Сообщений: 3,060
05.07.2013, 23:49 0

Определить, сколько места занимает в динамической памяти массив - Pascal ABC - Ответ 4811614

05.07.2013, 23:49. Показов 4006. Ответов 1
Метки (Все метки)
Лучший ответ Сообщение было отмечено Sanchezzz как решение

Решение

В ABC не знаю, но в Турбо так:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33

Type
  mas = Array [1..1] of Integer;
Var
  x: ^mas;
  i,k,min: Integer;
  n: Longint;
BEGIN
{$R-}
Write('Введите размерность массива: ');
Readln(n);
GetMem(x,SizeOf(Integer)*n);
k:=0;
min:=Maxint;
For i:=1 to n do
begin
  x^[i]:=Random(99)+1;
  If x^[i] mod 2=0 Then
  begin
    Inc(k);
    If x^[i]<min Then
    min:=x^[i];
  end;
  Write(x^[i],' ');
end;
Writeln;
Writeln('Массив занимает ',SizeOf(Integer)*n,' байт');
If k<>0 Then
Writeln('Наименьшее четное = ',min)
Else
Writeln('Четных нет');
FreeMem(x,SizeOf(Integer)*n);
Readln
END.


Вернуться к обсуждению:
Определить, сколько места занимает в динамической памяти массив Pascal ABC
1
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
 05.07.2013, 23:49
Готовые ответы и решения:

Определить, сколько места занимает Record в памяти
Подскажите пожалуйста какую функцию необходимо использовать для подсчёта сколько места занимает...

Определить, сколько места занимает в динамической памяти данный массив
Даны квадратная матрица A. Элементы вектора и матрицы задаются случайным образом. Размерность...

Определить, сколько места занимает в динамической памяти переменная целого типа
Как определить сколько места занимает в динамической памяти переменная целого типа?

Определить, сколько места занимает программа в памяти
как определить, сколько места занимает программа в памяти (без учета сегмента стека). ;...

1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
 05.07.2013, 23:49
Помогаю со студенческими работами здесь

Определить сколько места занимают в динамической памяти
Определить сколько места занимает в динамической памяти строка, содержащая 30 символов. Заранее...

Определить сколько места занимают в динамической памяти массивы
Помогите, пожалуйста, разобраться с динамическими массивами в PascalABC. Задание: Даны два вектора...

Определить, сколько места занимают в динамической памяти заданные массивы
Помогите с решением задач:1)Даны квадратные матрицы A, B и векторc. Элементы вектора и...

Определить сколько места занимают в динамической памяти следующие структуры
Определить сколько места занимают в динамической памяти переменные целого типа

0
КиберФорум - форум программистов, компьютерный форум, программирование
Поддержать - Реклама - Обратная связь
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru