Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Pascal Графики неявно заданных функций Добрый вечер! Помогите пожалуйста..столкнулся с проблемой построения графиков двух функций, заданных неявно, на одном..выразить ни один из аргументов не удается. Подскажите пожалуйста как это можно реализовать в Pascal..скорее всего через замену..но не могу ничего придумать.. Какие есть еще возможности? Во второй функции можно выразить x, но это ничего не дает..в первой же вобще ничего не... https://www.cyberforum.ru/ pascal/ thread129920.html Составить процедуру для замены всех отрицательных элементов массива нулями Pascal
Процедуры и функции ввести массив А{1..5}.Составить процедуру для замены всех отрицательных элементов массива нулями.Вывод элементов исходного массива и измененного организовать при помощи процедуры.... Спасибо ОГРОМНОЕ
Pascal Найти число элементов А{i;j}=T и сумму этих элементов https://www.cyberforum.ru/ pascal/ thread129917.html
Привет... Задание:задан двухмерный массив целых чисел А размером N на M.Найти число элементов А{i;j}=T и сумму этих элементов.
Pascal Сформировать массив случайных чисел и упорядочить его https://www.cyberforum.ru/ pascal/ thread129915.html
Доброго времени суток=) как можно сформировать одномерный массив с помощью генератора случайных чисел? массив должен быть из 10 элементов. сгенерировать массив в пределах от -100 до 100. вывести его на экран. элементы массива могут быть одинаковыми. а после отсортировать в порядке возрастания
Запросить имя пользовавателя и напечатать "Привет Вася", 10 раз Pascal
Необходимо преобразовать задачу так, что бы "Привет Вася" печаталось 10 раз, если Вася имя пользователя (используя цикл repeat). program 1212 uses crt; var name:string; i:integer; begin clrscr; write('Vvedite Vashe imia: '); readln(name); i:=1; repeat
Pascal по двумерным массивам дана целочисленная квадратная матрица. Определить: 1)сумму элементов в тех столбцах, которые не содержат отрицательных элементов(оформить в виде функции); 2) Минимум среди сумм модулей элементов диагоналей, параллельных побочной диагонали матрицы(оформить в виде процидуры). заранее спасибо! https://www.cyberforum.ru/ pascal/ thread129908.html
Pascal Спирограф https://www.cyberforum.ru/ pascal/ thread129901.html
Помогите пожалуйста, дали задание, а я вообще не шарю в паскале 1. В рисованных мультфильмах иллюзия движения создаётся сменой кадров, каждый из которых фиксирует очередное положение движущегося объекта. Используя этот принцип, получить мультфильм, показывающий: о прыжках в длину. 2. Спирограф-это зубчатый диск радиуса В, расположенного внутри колеса, радиуса А. Диск вращается против часовой...
Pascal Записи!
Доброго времени суток!!Помогите пожалуйста с решением!! На складе комплектующих деталей хранятся N деталей, каждая из которых характеризуется записью следующего вида: ZAP=record DTL:string; PR1:integer; PR2,PR3:boolean; end;
Pascal Множества https://www.cyberforum.ru/ pascal/ thread129893.html
Доброго времени суток!!Помогите пожалуйста с решением!! Даны три множества X1={Т2,Т4,Т6,Т8,Т10}, X2={Т1,Т2,Т3,Т4,Т5} и X3={Т2,Т3,Т5,Т7,Т8}. Сформировать множество Y=(X2\X3)+(X1\X2). На печать вывести Y и его мощность. Проверить выполнение условия X3 in Y. Исходные множества описать как типизированные константы. Заранее большое всем спасибо!
Pascal Динамические структуры данных Задача: В заданной строке, состоящей из английских существительных преобразовать слова по следующему правилу: к словам, оканчивающимся на "y" с предшествующей гласной, прибавить окончание "s" P.S Стеки или очереди. https://www.cyberforum.ru/ pascal/ thread129892.html
Преобразовать строку так, чтобы слова были разделены запятой и пробелом, Pascal
Слова в строке разделены одним или более пробелами. Преобразовать строку так, чтобы слова были разделены запятой и пробелом, за последним словом точка.
Pascal сколько различных символов всречаются в строке Дана строка. Подсчитать, сколько различных символов всречаются в ней. https://www.cyberforum.ru/ pascal/ thread129884.html
Почетный модератор
64300 / 47595 / 32743
Регистрация: 18.05.2008
Сообщений: 115,181
15.05.2010, 13:18 0

Прокомментировать - Pascal - Ответ 727967

15.05.2010, 13:18. Показов 570. Ответов 4
Метки (Все метки)

Ответ

Во первых у вас почему-то вместо пробелов стоит обозначение пустой строки, думаю это опечатка
Pascal
1
writeln(f, zp.pri, ' ':15-length(zp.pri),zp.cex, ' ':11-length(zp.cex), zp.zarp);
Эта запись обозначает что в каждую строку текстового файла мы записываем 3 значения, выделяя под первое 15 позиций, заполняя недостающие пробелами, под второе 11 позиций.
Получится строка типа
Код
Ющенко         мужской    15000


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

Прокомментировать код
1)начиная с while not eof(t) do и до конца условия program v4; var s:string; t:text; ...

Прокомментировать программу
Написать комментарий в каждой строке const maxRandomValue = 10; // рандомное число 0-10 ...

Прокомментировать код
Здравствуйте. Большая просьба, разъясните пожалуйста 3 задачи в паскале поподробнее, чтобы...

Прокомментировать код
Здравствуйте, помогите пожалуйста с задачей, разъясните в ней каждый оператор и цикл: function...

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

Прокомментировать код
Объясните пожалуйста подробнее операторы и циклы в 2 задачах, в них много непонятного кода и...

Прокомментировать код
Объясните как работает эта программа Program Lab7_2; const n=10; type vektor=arrayof integer;...

Прокомментировать код
program decision5_2; ...

Прокомментировать код
Здравствуйте. Друзья, разъясните пожалуйста чайнику каждый цикл и оператор в задачах, в них...

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