|
|
| Другие темы раздела | |
| Free Pascal Нахождение кратных чисел из одного большого числа Дамы и господа ... Информатика , 9-ый класс ... Задали создать программу в паскале ... она звучит так : "определите и выведите на экран количество чисел в указанном интервале (например от 10 до 1000) , делящихся без остатка на 7, 9 и 11 одновременно." я мучаюсь с ней уже 2-ой час .... Если не сдам завтра . получу 3 за четверть ... Заранее спасибо https://www.cyberforum.ru/ free-pascal/ thread1125440.html |
Free Pascal Цикл в цикле, зацикливание, запуск программы через командную строку Здравствуйте. Такая схема: var strin: AnsiString; answer: string; BEGIN while not eof do begin readln(strin); //куча кода repeat Writeln('Введите свой ответ: yes/no'); |
|
Free Pascal В 6 строке выбивает ошибку Runtime error 106 at 0x0040D038. Помогите разобраться в чем проблема
https://www.cyberforum.ru/ free-pascal/ thread1125237.html begin Assign( f, 'duom.txt'); reset(f); Readln(f, n,m); for i:= 1 to n do Read(f, koord_x, koord_y); end; В 6 строке выбивает ошибку Runtime error 106 at 0x0040D038. Помогите разобраться в чем проблема.. |
Free Pascal Написать программу, которая переводит число из десятичной системы в двоичную Здравствуйте! Вот задали мне такую задачку - написать программу, которая переводит число из десятичной системы в двоичную. Т.к. Паскаль я не знаю(перевёлся с другого ВУЗа и начал изучать его самостоятельно), то вначале сделал всё на блок-схемах и потом всё начал переписывать на язык паскаля. Вот что получилось: Program new; var x,n,d,m,y :integer; begin writeln('Введите положительное... https://www.cyberforum.ru/ free-pascal/ thread1124924.html |
|
Free Pascal Описать функцию max (X) для определения максимального элемента вектора X, введя вспомогательную рекурсивную функцию Всем доброго времени суток. Помогите пожалуйста разобраться в условиях задачи, а то что-то у меня с математикой плохо. const n=...; type vector = array of real; Описать функцию max(X) для определения максимального элемента вектора X, введя вспомогательную рекурсивную функцию max1(k), находящую максимум среди первых k элементов вектора X. Указание: пусть max(X) – функция, которая... |
Free Pascal В группе файлов найти такие файлы, в которых количество чисел с суммой цифр 27 не меньше количества строк.
https://www.cyberforum.ru/ free-pascal/ thread1124427.html Написать программу... На Free Pascal... В группе файлов найти такие файлы, в которых количество чисел с суммой цифр 27 не меньше количества строк. Данные файлы переименовать программным путем. Немного накидала, а как делать не знаю, но нужно вставлять в приложенный код. Помогите, пожалуйста) uses crt, dos; var Sr: SearchRec; f:teXt; procedure obrFiles; var s: string; begin |
|
Free Pascal Программа вычисляет произведение положительных и количество отрицательных элементов ряда чисел
https://www.cyberforum.ru/ free-pascal/ thread1124235.html Программа вычисляет произведение положительных и количество отрицательных элементов ряда чисел. Каждый элемент ряда вычисляется по формуле: (5*k – 8) / 2, где k –номер элемента в ряду. Всего элементов 20. program z8; var s,f,i:integer; a:real; begin s:=1; f:=0; for i:=1 to 20 do begin |
Не работает программа, считающая сколько в заданном слове заданных букв Free Pascal Есть код, программа считает сколько в заданном слове заданных букв. Но вот неработает. program bla; uses crt; var text,letter:string; i,c:integer; begin clrscr; c:=0; writeln('Write text: '); |
| Free Pascal Графика. Объясните Доброго дня программерам. Ребят, нужна помощь по графике паскаль. Так как сильно не владею графическими средствами, то прошу помощи у специалистов. В общем нужно построить график к данной программке, а именно зависимость v(t) и h(t).н.у. r=0.08, m=10, k=0.24, vn=0, tn=0, tk=15, hn=0, e=0.01. Заранее спасибо!!!! program kursach; Uses crt; Const g=9.807; pi=3.142; Type Mas1=array of real;... https://www.cyberforum.ru/ free-pascal/ thread1123878.html | Free Pascal Выполнить обменную сортировку Задан массив A(N). Добавить массив X(М). Выполнить обменную сортировку. Подсчитайте сумму положительных элементов полученного массива A(N+М). https://www.cyberforum.ru/ free-pascal/ thread1123460.html |
|
Free Pascal Сортировка включением Задан массив A(N). Добавить массив С(К). Выполнить сортировку включением. В полученном заданном массиве найти наибольший элемент из отрицательных значений. |
Free Pascal В заданном массиве A(N) найдет наибольший элемент из отрицательных значений. С использованием бинарного поиска В заданном массиве A(N) найдет наибольший элемент из отрицательных значений. С использованием бинарного поиска. https://www.cyberforum.ru/ free-pascal/ thread1123124.html |
|
Супер-модератор
  |
|
| 21.03.2014, 15:52 | 0 |
Определите, являются ли числа в файле упорядоченными по возрастанию - Free Pascal - Ответ 593137421.03.2014, 15:52. Показов 1116. Ответов 4
Метки (Все метки)
Ответ
Ьфыеук, во-первых, приказы тут отдавать не надо. Во-вторых, если тебе надо перевести откуда-то не Дельфи, то вопрос было бы логичнее задавать в форуме Дельфи, не кажется тебе?
Вернуться к обсуждению: Определите, являются ли числа в файле упорядоченными по возрастанию Free Pascal
0
|
|
| 21.03.2014, 15:52 | |
|
Готовые ответы и решения:
4
Определить, являются ли числа в файле упорядоченными по возрастанию Определите, является ли числа в файле упорядоченными
|
| 21.03.2014, 15:52 | |
| 21.03.2014, 15:52 | |
|
Помогаю со студенческими работами здесь
0
Процедуры: проверить, являются ли массивы G(20) и H(30) упорядоченными по возрастанию Определить, являются ли упорядоченными по возрастанию данные в каждой строке матрицы
Определить, являются ли числа в файле упорядоченными по возрастанию |