|
|
Другие темы раздела | |
Turbo Pascal Модуль для работы с комплексными чисами
https://www.cyberforum.ru/ turbo-pascal/ thread723441.html не могу решить нуждаюсь в помощи Вариант №2. Реализовать в виде модуля набор подпрограмм для выполнения следующих операций над комплексными числами: 1) сложение; 2) вычитание; 3) умножение; 4) деление; 5) вычисление модуля комплексного числа. Комплексное число представить следующим типом: Type Complex = Record R, M : Real; {действительная и мнимая часть числа} ... |
Turbo Pascal Побитовые операции помогите решить, пожалуйста!!!! var a,r1,r2,rn_1,rn, mask: word; begin write('a='); readln(a); rn:=a and 1; rn_1:=(a shr 1) and 1; writeln ('rn_1=',rn_1,' rn=',rn); if rn=rn_1 then writeln ('posl razr sovp'); |
Turbo Pascal Написать функцию для вычисления третьей стороны треугольника по известным двум сторонам и углу между ними.
https://www.cyberforum.ru/ turbo-pascal/ thread723423.html Ребята, огромная просьба составить 2 программы. 1) Написать функцию для вычисления третьей стороны треугольника по известным двум сторонам и углу между ними. Вычислить стороны треугольников по табличным данным. Для вычислений воспользоваться формулой: . 1. Сторона а, см 1. Сторона b, см 1. Угол , рад 2. 3 2. 4 2. /2 3. 2 3. 3 3. /4 4. 5.5 4. 3.1 4. 2/3 5. 1.75 5. 4.9 5. 3/4 |
Turbo Pascal составить функцию прошу помочь решить систему неравенств(прогу сам составлю) {f(a)!<a {(f(a)+1)!>a оба уравнения конечно под общей скобкой Добавлено через 7 часов 5 минут cпасибо всем уже составил https://www.cyberforum.ru/ turbo-pascal/ thread723418.html |
процедура sort_file Turbo Pascal Используя готовую процедуру sort_file ,составить программу сортировки текстового файла с размещением строк в пределах каждой страницы в алфавитном порядке по первому слову строки.Предусмотреть проверку существования исходного файла и переход на новую страницу с формированием номера страницы.Длинна страницы составляет 60 строк. |
Turbo Pascal Ошибка: неверное количество фактических параметров
https://www.cyberforum.ru/ turbo-pascal/ thread723379.html 81я строка, столбец 23. Что нет так я делаю? Моя цель ввести массив и файл, произвести над ними работу, и вывести массив и файл методом подпрограммы (не знаю, как собрать подпрограмму для вывода матрицы). Что не так? const nmax=20; type mas=array of integer; Var f,buf: File of Integer; x1,x2: mas; n1,m1,n2,m2: byte; t,i,n,j,x,k: Integer; a: Array of Integer; |
Turbo Pascal Подсчет символов в процессе их ввода Доброе время суток, скажите пожалуйста, а можно ли вообще в процессе ввода символов заставить программу считать количество нажатий на буквы? то есть уже не после того, как они будут отправленны клавишей enter, а в самом процессе их введения... к примеру в веденной фразе 5 символов, а в процессе ввода их было 10(то есть вводились, а потом стирались). помогите пожалуйста https://www.cyberforum.ru/ turbo-pascal/ thread723370.html |
Turbo Pascal вычислить бесконечную сумму Ʃ((-1)^i)/((i+1)!) при i→1 с точностью e=0,0001 помоги написать программу для того что бы вычислить бесконечную сумму Ʃ((-1)^i)/((i+1)!) при i→1 с точностью e=0,0001 |
Turbo Pascal Дано натуральное число. Определить количество четных цифр в нем 2. Дано натуральное число. Сколько в нем четных цифр? помогите написать программки) очень нужно https://www.cyberforum.ru/ turbo-pascal/ thread723344.html |
Turbo Pascal В последовательности целых чисел найти среднее арифметическое чисел, оканчивающихся на ноль и кратных четырем
https://www.cyberforum.ru/ turbo-pascal/ thread723341.html 3. написать программу которая в последовательности целых чисел находит среднее арифметическое чисел оканчивающихся на ноль и кратных четырем. Ввод последовательности оканчивается числом нуль. помогите написать программки) очень нужно |
Из матрицы 10x10 удалить любой столбец и любую строку вместе, чтобы получить матрицу 9x9 Turbo Pascal Как из матрицы 10x10 удалить любой столбец и любую строку вместе, чтобы получить матрицу 9x9? |
Turbo Pascal Найти наименьшее среди тех чисел последовательности, которые не входят в другую последовательность Даны две последовательности чисел.Найти наименьшее среди тех чисел последовательности,которые не входят во вторую последовательность.(Считать,что хотя бы одно такое число есть.) https://www.cyberforum.ru/ turbo-pascal/ thread723300.html |
0 / 0 / 0
Регистрация: 28.09.2012
Сообщений: 21
|
|
0 | |
Дано натуральное число n. Дописать к нему цифру k в конец и в начало. - Turbo Pascal - Ответ 382103608.12.2012, 00:32. Показов 3065. Ответов 1
Метки (Все метки)
Дано натуральное число n. Дописать к нему цифру k в конец и в начало (если это возможно, т.е. результат не выйдет за диапазон допустимых значений), или сообщить о невозможности выполнения операции.
Вернуться к обсуждению: Дано натуральное число n. Дописать к нему цифру k в конец и в начало. Turbo Pascal
0
|
08.12.2012, 00:32 | |
Готовые ответы и решения:
1
Дано натуральное число n<=99. дописать к нему цифру k в начало и в конец Дано натуральное число N. Дописать к нему цифру К в конец и начало Дано натуральное число n Дописать к нему цифру k в конец и в начало Дано натуральное число N<99. Дописать к нему цифру К конец и начало |
08.12.2012, 00:32 | |
08.12.2012, 00:32 | |
Помогаю со студенческими работами здесь
0
Дано натуральное число n<99. Дописать к нему цифру к в конец и в начало Дано натуральное число n ≤ 99. Дописать к нему цифру k в конец и в начало. Дано натуральное число. Дописать к нему в начало цифру k Дано натуральное число n. Приписать по единице в начало и в конец записи числа n |