![]() |
|
Другие темы раздела | |
Turbo Pascal Что нужно добавить до нормальной программы? Банк принял два вклада по 1000$. Один под 2% годовых, а другой под 3%. Через сколько лет второй вклад превысит первый на 100$? var a,a1,x:real; begin a:=1000; a1:=1000; repeat a:=a+(a*0.02); a1:=a1+(a1*0.03); x:=a1-a; https://www.cyberforum.ru/ turbo-pascal/ thread285094.html |
Составить блок схему к готовому коду Turbo Pascal ДЛя программы: Uses crt; Var A : array of integer; B : array of real; i, j, m, n, min, sum, K,P : integer; Begin |
Turbo Pascal как разобраться с условием
https://www.cyberforum.ru/ turbo-pascal/ thread285055.html Определить сколько существует вариантов дать сдачу 27 рублей монетами 1, 2, и 5 рублей так, чтобы общее количество монет было равно 10. Как в цикле условие задать? я вообще не могу сообразить. Подскажите пожалуйста! :gcray: |
Turbo Pascal Создание матрицы и ошибка "=" expected написал прогу, вроде все по синтаксису правильно, но выдает ошибки: Const ROW=3; COL=2; Type mas1: array of Integer; выдает "=" expected, не пойму почему нужно вместо двоеточия = писать mas2: array of Integer; Var a: mas1; b: mas2; https://www.cyberforum.ru/ turbo-pascal/ thread285032.html |
Turbo Pascal Удалить все символы через один, вставить символ "?" перед гласными, поменять местами первый и последний знак. Буква "А" Удалить все символы через один, вставить символ "?" перед гласными, поменять местами первый и последний знак. Буква "А" |
Turbo Pascal Как вычислить угол?? Около стены наклонно стоит палка длиной х м. Один ее конец находится на расстоянии у м от стены. Определить значение угла между палкой и полом для значений х — к м и у, изменяющегося от 2 до 3 м с шагом h м. var a,x,y,k,h:integer; begin writeln('вв длину палки'); readln(x); writeln('вв длину шага'); readln(h); y:=0; https://www.cyberforum.ru/ turbo-pascal/ thread285028.html |
Turbo Pascal найти ошибку
https://www.cyberforum.ru/ turbo-pascal/ thread285007.html написал программу частотного словаря но после ввода файла она закрывается и не создает файл словарь.txt. что мне надо исправить? Program slovar; Uses Crt; type pTree=^Tree; Tree=record inf: string; count: integer; lLink, rlink: pTree; end; |
Решите пожалуйста Turbo Pascal Прошу помощи у меня 4 часа, помогите решить хотябы пару задач Задачи в PDF |
Turbo Pascal Найти максимальный элемент массива от его номера 1) Вычислить элемент диапазона 2) Найти максимальный элемент массива от его номера. 3) Подсчитайте количество элементов, являющихся полным квадратомю https://www.cyberforum.ru/ turbo-pascal/ thread284950.html | Turbo Pascal Найти максимальное количество одинаковых элементов массива Дан целочисленный массив размера N. 1. Найти максимальное количество его одинаковых элементов. помогите плиз https://www.cyberforum.ru/ turbo-pascal/ thread284930.html |
Типизированые файлы Turbo Pascal Разработать программу для заполнения типизированного файла целыми числами в интервале . Обнулить компоненты файла, стоящие на нечетных местах. |
Turbo Pascal помогите Довести до ..... нормальной программы преподаватель говорит что ошибка в конце программы. и нужно добавить команды- чтение запись передача прав(уточнить какие именно) полный запрет полный доступ и желательно через case of . Заранее спасибо. https://www.cyberforum.ru/ turbo-pascal/ thread284894.html |
2 / 2 / 0
Регистрация: 30.03.2011
Сообщений: 66
|
|
0 | |
Рассчитать значение функции при изменении аргумента - Turbo Pascal - Ответ 159488128.04.2011, 08:04. Показов 1872. Ответов 1
Метки (Все метки)
Рассчитать значение функции y=sin(x)/(x+a)^2 при изменении аргумента "x" в диапазоне от 0 до Pi/2 с шагом Pi/80 и при изменении параметра "A" в диапазоне от 1 до 2 шагом 0,2(предусловие и постусловие)
Вернуться к обсуждению: Рассчитать значение функции при изменении аргумента Turbo Pascal
0
|
|
28.04.2011, 08:04 | |
Готовые ответы и решения:
1
Вычислить и вывести значение функции при изменении значения аргумента от А до В с шагом С Вычислить значение функции при изменении аргумента в указанном диапазоне и с заданным шагом |
28.04.2011, 08:04 | |
28.04.2011, 08:04 | |
Помогаю со студенческими работами здесь
0
|