ANTICHAT — форум по информационной безопасности, OSINT и технологиям
ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию.
Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club,
и теперь снова доступен на новом адресе —
forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
24.04.2008, 16:13
|
|
Banned
Регистрация: 06.01.2008
Сообщений: 904
Провел на форуме:
4037638
Репутация:
1821
|
|
Процедура ввода,(ввод каждого элемента через Enter):
Код:
procedure FillMassive (numel : integer; var a : TMassive);
var
i : integer;
begin
writeln('Введи элементы массива');//
for i := 0 to numel - 1 do
readln(a[i]);{Можешь заменить на read}
end;
з.ы. я еще не понел почему numel - 1 объясните пожалуйста)
Потому что numel - это всего элементов, а мы начинаем с нуля.....
Можно записать вот так
(for i := 1 to numel do)
=============
P.S.
Не судьба не много книжки почитать?
Плюс ко всему:
4. Просьба не писать в темах в заголовке слово "задачка" и похожие, потому что это будет расцениваться как просьба написать лабу, для чего создана отдельная тема
Выбирайте содержательные названия тем
(c)By _Great_
Прочитать правила >>
Последний раз редактировалось De-visible; 24.04.2008 в 16:38..
|
|
|
24.04.2008, 16:46
|
|
Новичок
Регистрация: 14.03.2008
Сообщений: 28
Провел на форуме:
39192
Репутация:
2
|
|
во второй задаче ругаетсяна эту строчку
function DropNulls (numel : integer; a : TMassive) : TMassive;
что не существует типа TMassive, хотя он задан  |
|
|
|
24.04.2008, 16:55
|
|
Новичок
Регистрация: 14.03.2008
Сообщений: 28
Провел на форуме:
39192
Репутация:
2
|
|
Плюс ко всему:
(c)By _Great_
Прочитать правила >>[/QUOTE]
извените, я потом заметил эту тему, не удаляйте пожалуйста, еще не все вопросы решили |
|
|
|
26.04.2008, 14:42
|
|
Новичок
Регистрация: 14.03.2008
Сообщений: 28
Провел на форуме:
39192
Репутация:
2
|
|
помогите с контрольной плиз
Требования к выполнение контрольной работы:1) Каждый пункт меню и вывод текста меню выполняется в подпрограмме.
2) Если в начале работы сразу выбирается пункт ниже первого (массив не задан), получить массив генерацией его элементов в интервале от –100 до 100
3) После выполнения каждого пункта меню (кроме последнего), программа снова возвращается в меню.
4) Вычисление суммы, количества, произведения, минимума или максимума выполняется с помощью функции.
5) При сдаче контрольной работы преподавателю, вывести промежуточные результаты в окне Watch в пошаговом режиме.
Текст задания
Создать программу, обеспечивающую работу следующих пунктов меню.
1) Ввод массива целых чисел.
2) Вывод массива в строку.
3) Найти максимальный элемент. Заменить все положительные элементы, кратные пяти на максимальный элемент.
4) Конец работы.
у меня просто сессия скоро, долгов много накопилось, за те за дачи большое спасибо, сдал их 
Последний раз редактировалось WinTREI; 26.04.2008 в 14:45..
|
|
|
|
26.04.2008, 15:12
|
|
Banned
Регистрация: 06.01.2008
Сообщений: 904
Провел на форуме:
4037638
Репутация:
1821
|
|
Сообщение от WinTREI
помогите с контрольной плиз
Требования к выполнение контрольной работы:1) Каждый пункт меню и вывод текста меню выполняется в подпрограмме.
2) Если в начале работы сразу выбирается пункт ниже первого (массив не задан), получить массив генерацией его элементов в интервале от –100 до 100
3) После выполнения каждого пункта меню (кроме последнего), программа снова возвращается в меню.
4) Вычисление суммы, количества, произведения, минимума или максимума выполняется с помощью функции.
5) При сдаче контрольной работы преподавателю, вывести промежуточные результаты в окне Watch в пошаговом режиме.
Текст задания
Создать программу, обеспечивающую работу следующих пунктов меню.
1) Ввод массива целых чисел.
2) Вывод массива в строку.
3) Найти максимальный элемент. Заменить все положительные элементы, кратные пяти на максимальный элемент.
4) Конец работы.
у меня просто сессия скоро, долгов много накопилось, за те за дачи большое спасибо, сдал их Могу решить ICQ#: 223333575....()
|
|
|
|
26.04.2008, 21:02
|
|
Новичок
Регистрация: 14.03.2008
Сообщений: 28
Провел на форуме:
39192
Репутация:
2
|
|
Сообщение от De-visible
Могу решить ICQ#: 223333575....()
я так понел что не бесплатно?
De-visible: ты напиши точнее задание, а то не все понятно...я поэтому попросил в аську постучать...
Последний раз редактировалось De-visible; 27.04.2008 в 12:41..
|
|
|
|
27.04.2008, 20:38
|
|
Новичок
Регистрация: 26.04.2008
Сообщений: 11
Провел на форуме:
15580
Репутация:
0
|
|
Построить график функции f(x) = cos(x)∙ctgx. Вот и вся задача ... Поверьте и более сложные решал, но как это незнаю эх говрили мне учи математику  |
|
|
|
27.04.2008, 20:56
|
|
Banned
Регистрация: 06.01.2008
Сообщений: 904
Провел на форуме:
4037638
Репутация:
1821
|
|
Сообщение от 47726573684e
Построить график функции f(x) = cos(x)∙ctgx. Вот и вся задача ... Поверьте и более сложные решал, но как это незнаю эх говрили мне учи математику Здесь про графику написано [я пока занят]
Графика в паскале
Графика в паскале{Вставки асм}
Последний раз редактировалось De-visible; 27.04.2008 в 20:59..
|
|
|
|
28.04.2008, 10:24
|
|
Новичок
Регистрация: 26.04.2008
Сообщений: 11
Провел на форуме:
15580
Репутация:
0
|
|
Да знаю я графику ! Блин Я незнаю как f(x) = cos(x)∙ctgx нарисовать, ладно бы просто синусойда или косинусойда была а тут хз .... Ну лана помучу сам , извиняюсь за беспокойство....
|
|
|
|
28.04.2008, 10:27
|
|
Познавший АНТИЧАТ
Регистрация: 27.04.2007
Сообщений: 1,044
Провел на форуме:
3660186
Репутация:
905
|
|
47726573684e, попробуй преобразовать выражение, например, расписать котангенс
|
|
|
|
|
 |
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|
Похожие темы
Комбинированный вид
