Форум программистов, компьютерный форум, киберфорум
Free Pascal
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Free Pascal кто знает, где ошибка в алгоритме?? https://www.cyberforum.ru/ free-pascal/ thread311689.html
переписать все положительные элементы массива BB(N) подряд в массив ZBB.
Free Pascal Можете помочь в поиске ошибки и в написании программы на тему "3аписи"
1) Пишет ошибку 100 - exited with exitcode((( 3адача: Отсортировать числовой массив в файле в порядке неубывания. В файле первая компонента – размер массива, далее – элементы массива. const max_array = 1000; var Fo: File of Longint; Fi: File of Longint; A: array of longint; i, j, X, N: longint; begin Assign(Fi, 'input.txt');
Free Pascal В текстовом файле найти сумму чисел, встретившихся в нем https://www.cyberforum.ru/ free-pascal/ thread311405.html
В текстовом файле найти сумму чисел, встретившихся в нем
Free Pascal Алгоритмы создания лестницы https://www.cyberforum.ru/ free-pascal/ thread311359.html
Здравствуйте. Столкнулся с проблемой при написании курсовой. Взял, вроде бы, легкое задание, а на деле что-то сложности возникли =) Нужно написать три различных алгоритма построения лестниц. Само задание: дано n блоков, какое количество всевозможных лестниц можно из них построить? Разобрался только с тем, что принял в условие: если, рассматривая лестницу вертикально, принять, что ее уровни...
Вывести примерные оценки на следующий семестр Free Pascal
нужна срочно помощь..... программа такая: надо вывести примерные оценки на следующий семестр. код частично готов... если выводить средний балл, то все работает, а вот если на несколько оценок.... вот в этом проблема... не могу ни как додуматься.... помогите....
Free Pascal Доделать процедуру Помогите пожалуйста доделать задачу модуль_1 unit op; interface const n=3; type lawsuit=record data:record day:1..31; https://www.cyberforum.ru/ free-pascal/ thread311002.html
Free Pascal Однонаправленные списки Помогите, пожалуйста, разобраться, и, по-возможности исправить программу) Нужно вставить символ Е1 после первого вхождения символа Е если Е существует program lab19; uses crt; type swas=^zveno; https://www.cyberforum.ru/ free-pascal/ thread310888.html Описать тип записи "Автомобиль" Free Pascal
Розробити схему, опис алгоритму і програму для обробки інформації відповідно до варіанту завдання. Програма повинна містити: 1. Підпрограми для: а) виводу шапки таблиці; б) виводу даних одного рядка таблиці; в) вводу і виводу масиву записів й визначення суми значень елементів одного стовпця масиву записів; г) пошуку (або сортування) і виводу потрібних компонентів масиву записів (рядків...
Free Pascal Бинарный поиск https://www.cyberforum.ru/ free-pascal/ thread310511.html
Здравствуйте. Дано два массива. Нужно вывести элементы, которые встречаются только в одном из массивов. Массив с 20 элементов. Нужно выполнить эту задачи при помощи бинарного поиска.
Free Pascal Вычислить значение функции по двум свойствам Функция f обладает двумя свойствами: 1) f(x*y)=f(x)*f(y); 2) f(p)=p-1, если p - простое число; Для заданного натурального числа n вычислите f(n). входные данные: 5 Выходные: 4 входные данные: 15 https://www.cyberforum.ru/ free-pascal/ thread310476.html
Free Pascal На какое минимальное число равных квадратов можно разрезать прямоугольник с заданными сторонами?
С клавиатуры вводятся два натуральных числа - длинна и ширина прямоугольника. Определите на какое минимальное число равных квадратов его можно разрезать? входные данные: 208 56 Выходные: 182
Free Pascal Определить порядковый номер наименьшего из элементов последовательности погите... Дана непустая последовательность различных натуральных чисел, за каторой следует 0. Определить порядковый номер наименьшего из них. https://www.cyberforum.ru/ free-pascal/ thread310438.html
2022 / 1621 / 489
Регистрация: 31.05.2009
Сообщений: 3,005
03.06.2011, 21:53 0

Модуль CRT, clrscr и кириллица - Free Pascal - Ответ 1722936

03.06.2011, 21:53. Показов 22807. Ответов 15
Метки (Все метки)

Ответ

А до вызова clrscr кириллица выводится нормально? Попробуй установить кодировку вот таким образом
Pascal
1
2
3
4
5
6
7
uses
  Windows;
begin
  SetConsoleCP(1251);
  SetConsoleOutputCP(1251);
  ...
end.


Вернуться к обсуждению:
Модуль CRT, clrscr и кириллица Free Pascal
1
Заказать работу у эксперта
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
03.06.2011, 21:53
Готовые ответы и решения:

Модуль CRT
Ребята, помогите Please:help:: Надо зарисовать фон не используя графический модуль:wall: Я слышал...

Модуль CRT
У меня есть такого вида меню: uses crt; var s,s1,s2,s3,s4:string; x,y:integer; kod:char; begin...

модуль Crt
Доброго времени суток! Помогите пожалуйста. Мне нужно переделать эту программу так, чтобы внутри...

Модуль Crt
1. Сгенерировать случайным образом и вывести на экран 8 окон разного цвета и размера. ...

15
03.06.2011, 21:53
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
03.06.2011, 21:53
Помогаю со студенческими работами здесь

Модуль CRT
Здравствуйте! Помогите, пожалуйста. Как написать такую программу на Pascal?

Модуль Crt
Во всех заданиях в последней строке экрана сформируйте подсказку о «горячих» клавишах и реализуйте...

модуль CRT
не удивляйтесь вопросу, но мне очень нужно узнать ,что-то дополнительно (интересное) о модуле CRT....

Модуль crt;
Доброго времени суток)) Процедуры и функции модуля CRT; Составьте программу вывода на экран окна....

0
Новые блоги и статьи
Откуда у float лишние цифры в конце дробной части. Представление чисел с плавающей точкой
bytestream 25.01.2025
При разработке программного обеспечения часто возникает необходимость работать с вещественными числами, которые содержат дробную часть. В современных компьютерных системах такие числа представляются. . .
Как использовать глобальную переменную в функции в Python
bytestream 25.01.2025
В программировании на Python глобальные переменные представляют собой особый тип переменных, которые доступны для использования во всех частях программы, включая различные функции, классы и модули. . . .
Как в цикле обойти все элементы map в Java
bytestream 25.01.2025
В разработке на Java одной из наиболее востребованных структур данных является интерфейс Map, который предоставляет эффективный способ хранения и управления парами "ключ-значение". Разработчики. . .
Для чего нужен UserManager.isU­serAGoat(­) в Android и как это использовать
bytestream 25.01.2025
В мире Android-разработки существует множество интересных и порой загадочных функций, о которых знают далеко не все разработчики. Одной из таких функций является метод UserManager. isUserAGoat(),. . .
Как обойти масси в JavaScript. Всё о циклах
bytestream 25.01.2025
JavaScript представляет собой мощный язык программирования, широко используемый в веб-разработке, где массивы и циклы являются фундаментальными концепциями для эффективной работы с данными. Массив в. . .
Как сделать, чтобы существующая ветка отслеживала удалённую в Git. Связывание локальных и удалённых веток
bytestream 25.01.2025
В разработке программного обеспечения системы контроля версий стали неотъемлемой частью процесса создания качественного программного продукта. Эти инструменты позволяют разработчикам эффективно. . .
Как проверить, что файл НЕ существует с помощью Bash
bytestream 25.01.2025
В системном администрировании проверка существования файлов является фундаментальной операцией, особенно при написании скриптов на Bash. Правильная обработка ситуаций, когда файл отсутствует,. . .
Как проверить, что строка пустая, неопределена или null в JavaScript
bytestream 25.01.2025
При разработке веб-приложений на JavaScript разработчики регулярно сталкиваются с необходимостью проверки строковых значений на различные состояния. Валидация данных является критически важным. . .
Как проверить существование ключа в объекте или массиве в JavaScript
bytestream 25.01.2025
При разработке веб-приложений на JavaScript программисты постоянно сталкиваются с необходимостью работать с объектами и массивами. Эти структуры данных являются фундаментальными элементами языка и. . .
Как создать ArrayList из массива (array) в Java
bytestream 25.01.2025
При разработке программного обеспечения на языке Java программисты часто сталкиваются с необходимостью эффективного управления наборами данных. Массивы и ArrayList являются двумя фундаментальными. . .
Как сгенерировать случайные целые числа (int) в указанном диапазоне в Java
bytestream 25.01.2025
В программировании генерация случайных чисел является важнейшим инструментом для решения множества практических задач. От создания игровых механик до реализации алгоритмов машинного обучения, от. . .
Как сделать, чтобы grep выводил строки до и после найденной
hw_wired 25.01.2025
Утилита grep стала незаменимым инструментом для поиска и фильтрации информации в Unix-подобных операционных системах. Эта командная утилита позволяет осуществлять поиск строк, соответствующих. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru