Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Turbo Pascal Написать программу: Вычисление суммы элементов главной диагонали матрицы https://www.cyberforum.ru/ turbo-pascal/ thread910307.html
Помогите написать программу :) 1. Вычисление суммы элементов главное диагонали матрицы 2. Вычисление количества отрицательных элементов в каждом столбце матрицы Спасибо!
Turbo Pascal Описать процедуру Minmax(A,B), записывающую в переменную A минимальное из значений A и B, а в переменную B — максимальное из этих значений
В заданиях данной подгруппы требуется реализовать процедуры или функции с числовыми параметрами типа integer и real. Входные параметры этих типов обычно описываются как параметры-значения. 1. Описать процедуру Minmax(A,B), записывающую в переменную A минимальное из значений A и B, а в переменную B — максимальное из этих значений (A и B — вещественные параметры, являющиеся одновременно входными...
Turbo Pascal Дана строка. Вывести строку, содержащую те же символы, но расположенные в обратном порядке Дана строка. Вывести строку, содержащую те же символы, но расположенные в обратном порядке https://www.cyberforum.ru/ turbo-pascal/ thread910290.html Turbo Pascal Удалить из текста все однобуквенные слова и лишние пробелы Помогите с написанием программы,никак не получается. Дан текстовый файл f. Удалить из текста все однобуквенные слова и лишние пробелы.(группы символов,разделенные пробелами(одним или несколькими),будем считать словами).Результат записать в файл g. https://www.cyberforum.ru/ turbo-pascal/ thread910280.html
Последовательности Turbo Pascal
Заданы z и y – две последовательности. Можно ли получить последовательность z вычеркиванием элементов из y. Определить количество вариантов. Первая часть программы решена uses crt; var z, y: string; i, j, k, index: integer; flag: boolean;
Turbo Pascal Численные методы решения уравнений Помогите пожайлуста с решение данной задачи. 1.В программе предусмотреть формирование меню из четырех пунктов: три пункта - для вызова методов(для каждого метода отдельная подпрограмма: метод половиного деления,метод хорд и метод касательных),четвертый пункт - для выхода из программы. 2.Для каждого метода вывести на экран полученное значение корня ,число итераций и точное значения корня. 3.... https://www.cyberforum.ru/ turbo-pascal/ thread910264.html
Turbo Pascal Решение уравнений методами половинного деления, хорд и касательных 1. В программе предусмотреть формирование меню из четырех пунктов: три пункта - для вызова методов(для каждого отдельная программа: метод половинного деления, метод хорд и метод касательных), четвёртый пункт - для выхода из программы. 2. Для каждого метода вывести на экран полученное значение корня, число итераций и точное значение корня. 3. Для всех методов задать одинаковую точность... https://www.cyberforum.ru/ turbo-pascal/ thread910260.html Turbo Pascal Вычислить сумму элементов файла до первого отрицательного
Написать программу решения задачи Файлы Создать файл вещественных чисел. Открыть данный файл для редактирования. Вычислить сумму элементов до первого отрицательного. Полученное значение сохранить в этом же файле. Добавлено через 1 час 21 минуту ...
Turbo Pascal Методы вычисления определенных интегралов https://www.cyberforum.ru/ turbo-pascal/ thread910253.html
Всем привет. Есть полностью написаная программа для вычисления интегралов методом прямоугольников(левых,правых,средних),методу трапеций и методу симпсона,только для других значений помоги пожайлуста подставить свои значения. Мои значения: Подынтегральная функция: 2^3x = Первообразная: ((2^3x)-1)/3ln(2) Код программы: uses crt; const a=1; b=4;
Turbo Pascal Описать структуру с именем STUDENT Спасибо ребята , что помогаете Написать программу решения задачи Записи 1. а) Описать структуру с именем STUDENT, содержащую следующие поля:  NAME- фамилия и инициалы;  Номер группы;  Успеваемость (массив из пяти элементов). б) Написать программу, выполняющую следующие действия: https://www.cyberforum.ru/ turbo-pascal/ thread910252.html
Turbo Pascal Найти сумму и произведение элементов k-го столбца данной матрицы
Дано число k (0 < k < 11) и матрица размера 4 x 10. Найти сумму и произведение элементов k-го столбца данной матрицы. Выручайте ребята,сессию закрывать надо(
Turbo Pascal рисунок через рекурсии надо сделать такой рисунок, сначала рисуются красные линии, потом остальные с помощью рекурсии. Помогите плз. https://www.cyberforum.ru/ turbo-pascal/ thread910210.html
0 / 0 / 0
Регистрация: 23.06.2013
Сообщений: 18
0

Как изменить код чтобы результат программы выводился отделным текстовым файлом? - Turbo Pascal - Ответ 4761957

23.06.2013, 21:07. Показов 801. Ответов 1
Метки (Все метки)

Author24 — интернет-сервис помощи студентам
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
n = 15;
    atext: array[1..10] of char = ('0','1','2','3','4','5','6','7','8','9');
    acode: array[1..11] of char = ('&','+','/','.','^','@','"','!','%','#','$');
var
    mytext: array[1..n] of char;
    mycode: array[1..n] of char;
    i, j: integer;
 
begin
    writeln('Введите данные: ');
    for i := 1 to n do
        read(mytext[i]);
 
    for i := 1 to n do begin
        j := 1;
        while (j <= 10) and (mytext[i] <> atext[j]) do
            j := j + 1;
        if j <= 10 then
            mycode[i] := acode[j]
        else
            mycode[i] := acode[11];
    end;
 
    write('Результат: ');
    for i := 1 to n do
        write(mycode[i]);
 
readln;
end.


Вернуться к обсуждению:
Как изменить код чтобы результат программы выводился отделным текстовым файлом? Turbo Pascal
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
23.06.2013, 21:07
Готовые ответы и решения:

Как подправить макрос, чтобы результат выводился не на странице этого файла, а новым файлом?
У меня проблема. Есть файл эксель с макросом, который выдает результат на странице этого же файла....

Изменить код, чтобы в начале программы выводился запрос для ввода размера стека
Нужно изменить пример так, чтобы в начале работы программы выводился запрос для ввода размера...

Как изменить код чтобы выводился номер дня с начала года?
Насколько я поняла, 24-29 определяет количество дней от текущей даты до введённой. Как можно...

Изменить код программы так чтобы работа происходила с консолью а не с файлом
Помогите изменить код программы так чтобы работа происходила с консолью а не с файлом. USES Crt;...

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

Изменить код, чтобы год рождения тоже выводился в упорядоченный массив
uses crt; type tzap = record {Описание типа для одной записи списка} Fio:...

Изменить запрос, чтобы еще выводился код абонемента, для которого указана максимальная цена
Помогите пожалуйста!!!!SELECT Абонементы.Код_зала, Max(Абонементы.Цена) AS МАХ,...

Как сделать так чтобы результат выводился в градусах ?
Нужно что бы результат выводился в градусах, а то он выводит числа типо 0.0000034 и т д Если надо...

Как сделать чтобы в калькуляторе результат выводился и на мемо?c++ builder, help me
хочу чтобы калькулятор при написании цифр выводился результат на мемо, чтобы при нажатии кнопки...

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