Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal определить число сотен помогите с задачкой на паскаль вот условие Дано натуральное число n ( n> 99 ). Определить число сотен в нем. я пока еще не очень разбираюсь, почитал книги и попробовал сам но у меня получилось что программа выдает например если ввести 590 то получается либо 5.9 либо 6. вобщем помогите пожалуста https://www.cyberforum.ru/ pascal/ thread8288.html Pascal Дан массив из восьми строк
Дан массив из восьми строк. В строке "фамилия студента_оценка1_оценка2". Приписать к каждой строке средний балл. отсортировать по убыванию балла и распечатать. Задачу нужно решить без функций и процедур. Помогите разобраться и решить эту задачу плиз? Добавлено через 59 минут Вот мой код, тут вводяться элементы матрицы, и выводятся без всяких изменений. Нужно чтобы он складывал число после...
Pascal ПОМОГИТЕ с комментариями https://www.cyberforum.ru/ pascal/ thread8275.html
прокомментируйте плиз прогу, я прост в паскале не силен......желательно подробно.....спс.... вот код type TreeLink = ^Tree; Tree = record Data: string; Left, Right: TreeLink; end; procedure InsTree(var t:TreeLink; Num, NumNode : integer; S:String); var PNum, LNum, k : integer; begin
Pascal Очень срочно, простая задача на матрицы! https://www.cyberforum.ru/ pascal/ thread8259.html
Пожалуйста, выручите! На завтра нужна такая программка: даны 49 чисел (думаю логичнее всего рандомом заполнять), из них нужно составить матрицу по следующей схеме: http://mediapix.ru/pics/1cafd8aca506e00eb91ed7ab409f511b.jpg Очень-очень надо!
Подсчитать количество цифр, входящих в строку Pascal
Дана строка, содержащая 30 символов. Подсчитать количество цифр, входящих в данную строку.
Pascal Помогите Пожалуйста оч оч нужно! задачки Пожалуйста помогите решить несколько задачек,а то я нитё не понимаю Плиз плиз плиз! Я буду очень благодарна! Линейные алгоритмы: 1)Заданы два целых числа k и d. Используя только арифметические операции, найдите целую и дробную части от деления k на d. 2)Дано действительное число a. Не пользуясь никакими другими операциями кроме умножения, получить a21 за шесть операций; ("21"-в... https://www.cyberforum.ru/ pascal/ thread8244.html
Pascal Задача на строки, немогу разобраться https://www.cyberforum.ru/ pascal/ thread8243.html
В строке заданы через двоеточие 2 оператора присваивания общего вида: "первый:=число1+число2:второй:=число3-число4" (например:"A:=3+4:B:=7-2"). Вычислить значения переменых и распечатать их. Вот решение задачи примерно такова типа только для знаков +,-,*,/ и выражения вида "первый:=число1 знак число2" program expression; var s:string;ss:string;si:Char;a1,a2,is,i,p1,p2:integer;res:real;...
Определить сколько в файле f слов состоящих из одного, двух, трех и т.д. символов Pascal
Дан символьный файл f Считая что количество символов в слове не превосходит 20 а)определить сколько в файле f слов состоящих из одного, двух, трех и т.д. символов б)сколько слов в файле вот я половину сделал, дальше не как, помогите пжалуста !!! Program alex; Uses crt; Var a:array of integer; f:text;
Pascal Матрицы. Найти сумму элементов главной и побочной диагонали. https://www.cyberforum.ru/ pascal/ thread8199.html
Дана матрица вещественых чисел P(7,7). Вычислить сумму элементов главной диагонали и симметричной ей. program qwesadf; uses crt; var p:array of real;i,n,j:integer;s1,s2:real; begin clrscr; writeln('vvedite razmer matrici'); readln(n); writeln('vvedite elementi matrici');
Pascal Старый добрый тетрис Помогите вывести текущий результат и следующую фигуру. Заранее благодарен. { Программа Тетрис} uses crt, graph; type tFigure=array of byte; tFigures=array of tFigure; tColors=record workbox:byte; figures:array of byte; https://www.cyberforum.ru/ pascal/ thread8184.html
Pascal ПРОШУ ПОДМОГИ!!!
Уважаемые гуру! Помогите пожалуйста подредактировать данную программу, для того, чтобы при построении графика не печатались лишние пикселы справа.:help: Текс проги: Program Grafik; uses graph, crt; var driver, mode, i: integer; x,y, S: real; cx,cy: word; {center} d1,d2: integer; {diapazon} mas: byte; {masshtab}
Pascal Перевод чисел из 16-ой в 10-ую систему счисления прграмма перевода чисел из 16-ой в 10-ую :huh::help::help: https://www.cyberforum.ru/ pascal/ thread8152.html
Почетный модератор
64288 / 47587 / 32739
Регистрация: 18.05.2008
Сообщений: 115,182
21.05.2008, 11:53 0

глобальные переменные - Pascal - Ответ 36358

21.05.2008, 11:53. Показов 2066. Ответов 2
Метки (Все метки)

Ответ

А как помочь? Помолиться что-ли за Вас?

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

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

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

Глобальные переменные и процедуры
Итак, я решил, что начать изучение этого языка лучше начать с написания чего-то интересного и...

Глобальные переменные
Написать программу, которая с помощью подпрограммы процедуры находит сумму элементов одномерного...

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

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

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

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

Локальные и глобальные переменные
var a,b,c,d:integer; procedure p(x:integer; var a:integer); var c:integer; begin x:=5;...

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