Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Turbo Pascal Подпрограмма процедура https://www.cyberforum.ru/ turbo-pascal/ thread2249397.html
Пусть дано описание type z=record x,y: real; end; Написать программу, которая с помощью подпрограммы процедуры находит значение выражения: d= sin^2*x + 2*cosy^2
Процедура сортировки массива Turbo Pascal
Необходимо создать процедуру сортировки одномерного массива по возрастанию,входные данные размерность массива и он сам,так же необходимо, чтобы программа выводила отсортированный на экран и в файл output.txt
Turbo Pascal Написать программу, которая выводит на экран график любой функции представляющей собой многочлен не выше 5-ой степени https://www.cyberforum.ru/ turbo-pascal/ thread2249183.html
написать программу которая выводит на экран график любой функции представляющей собой многочлен не выше 5-ой степени
Turbo Pascal Сортировка по цвету https://www.cyberforum.ru/ turbo-pascal/ thread2249155.html
Доброго времени суток, нужна ваша помощь. Вводим текстовую инфу в колонки, а одна из колонок цвет Каким образом можно сортировать весь ряд по цвету ? (Просто чтобы элементы с одинаковым цветом стояли рядом) Заранее спасибо !
Добавить графический интерфейс Turbo Pascal
Сделайте графический интерфейс для игры
Turbo Pascal Вычеркнуть простые числа из последовательности Помогите составить программу, где будет сначала вводиться граничное число n, потом из этой последовательности натуральных чисел будут вычеркиваться все числа сначала кратные 2ке потом 3ке, потом следующему простому числу, итд. Последовательность должна быть задана в виде односвязного списка https://www.cyberforum.ru/ turbo-pascal/ thread2248872.html
Turbo Pascal При использовании read или readln строка ввода опускается все ниже-ниже. Как-то этого избежать? При каждом использовании будь то read или readln строка ввода опускается все ниже-ниже, возможно как-то это избежать? https://www.cyberforum.ru/ turbo-pascal/ thread2248674.html Turbo Pascal Проверка введеного символа в переменную
Имеется переменная a типа integer, как можно сделать так, чтобы пока пользователь не введет число из ДИАПАЗОНА integer(т.е исключить ввод вещественных чисел и букв, а также чтобы вводимое число попадало в диапазон integer), программа просила ввести заного число
Turbo Pascal В файле типа RECORD хранится информация о студентах: ФИО студента, наименование специальности, курс, средний балл https://www.cyberforum.ru/ turbo-pascal/ thread2248629.html
Нужно составить программу по этому заданию: В файле типа RECORD хранится информация о студентах: ФИО студента, наименование специальности, курс, средний балл за сессию. Составить программу для получения: • Сведений о студентах заданного курса, средний балл которых равен 4; • Информации о количестве студентов заданного курса и специальности. Буду очень благодарен
Turbo Pascal В матрице удалить строки с несколькими максимумами и столбцы с заданной суммой элементов, 2-ю строку отсортировать https://www.cyberforum.ru/ turbo-pascal/ thread2248443.html
Приветствую всех форумчан и случайно заглянувших в эту тему! Как оказалось, слова: "Помощь", "решение", "Help" и еще что-то запрещены правилами данного форума, в связи с чем и появился заголовок темы, который Вы и увидели) Ребят, огромная просьба помочь в написании программы на Turbo Pascal (работал в ней классе в 8, но сейчас очень тяжело это вспомнить, на делфи еще что-то могу состряпать, но...
Turbo Pascal Найти суммы членов геометрической прогресии
Напишите программу в паскале, для нахождения суммы членов (2/3,3/4,/4/5,5/6,6/7,7/8,8/9,9/10)геометрической прогресии с помощью цикла, желательно очень простенькую БУДУ ОЧЕНЬ БЛАГОДАРЕН!
Turbo Pascal Нельзя преобразовать тип string к char Program t; Uses Crt; Var x, { Аргумент } y:real; { Функция } Const x1 = -2.517; { Левая граница промежутка } x2 = 3.571; { Правая граница промежутка } Const https://www.cyberforum.ru/ turbo-pascal/ thread2247204.html
Эксперт Pascal/Delphi
6807 / 4565 / 4818
Регистрация: 05.06.2014
Сообщений: 22,438
24.05.2018, 18:29 0

Глобальные переменные - Turbo Pascal - Ответ 12419644

24.05.2018, 18:29. Показов 1690. Ответов 1
Метки (Все метки)

Лучший ответ Сообщение было отмечено LenaKomerzan как решение

Решение

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
const
  n = 100;
 
var
  a: array[1..n] of integer;
  i, sum, min: integer;
 
procedure MinAndSum;
var
  i: integer;
begin
  sum := 0;
  min := a[1];
  for i := 1 to n do
  begin
    if a[i] < min then 
      min := a[i];
    sum := sum + a[i];
  end;
end;
 
begin
  randomize;
  for i := 1 to n do
  begin
    a[i] := -n div 2 + random(n);
    write(a[i]:4);
  end;
  writeln;    
  MinAndSum;
  writeln('Минимальный элемент массива: ', min);
  writeln('Сумма элементов массива: ', sum);
end.


Вернуться к обсуждению:
Глобальные переменные Turbo Pascal
1
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
24.05.2018, 18:29
Готовые ответы и решения:

Глобальные и локальные переменные, одна и та же прога в процедуре Не работает, а просто так работает. Почему?
Здравствуйте, есть программка которая переводит из 2-ной системы в 10-ную. Она работает. А вот...

Глобальные переменные
помогите переделать программу надо убрать глобальные переменные у самого не получается=(( program...

глобальные переменные
Помогите пожалуйста избавиться от глобальных переменных! Заношу все в процедуры, программа не идет...

Локальные и глобальные переменные.
ОГбьясните пожалуйста чем отличаются Procedure и Function Да и что такое глобальные и локальные...

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

Из локальных в глобальные
Помогите переделать ил локальных в глобальные uses crt; Const Rows=6; ...

Как описываются переменные типа запись? В каких случаях целесообразно использовать переменные типа запись?
1. Как описываются переменные типа запись? 2. В каких случаях целесообразно использовать...

Глобальные и статические глобальные переменные
Скажите, чем отличаются глобальные переменные от статических глобальных переменных?

Глобальные переменные
Как можно описать пункты меню (массив), чтобы потом его можно было подгружать из разных файлов???

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