|
|
Другие темы раздела | |
Turbo Pascal Для заданной квадратной матрицы сформировать массив
https://www.cyberforum.ru/ turbo-pascal/ thread1416823.html 15 |
Turbo Pascal Вывод графических элементов: строки текста заданным цветом и шрифтом Вывести на экран монитора горизонтальная строка текста длиной не более двадцати пяти символов синего (Blue) цвета двойного размера шрифтом типа "SansSerif" (SansSerifFont). |
Turbo Pascal Определить, что пользователь вписал цифры или обычный текст
https://www.cyberforum.ru/ turbo-pascal/ thread1416573.html Как в TurboPascal определить, что пользователь вписал в "N", цифры или обычный текст, и если это были цифры, то они преобразовывались из string в integer? ... N:string; ... readln (N); ... Добавлено через 4 минуты Ну и просто для более подробного описания того, что я хочу узнать: нужно сделать игру "Рулетка", там можно будет ставить на диапазон чисел, на определённое число или на... |
Turbo Pascal Поменять местами соседние элементы массива, стоящие на чётных местах с элементами, стоящими на нечётных местах В заданном одномерном массиве поменять местами соседние элементы,стоящие на чётных местах,с элементами,состоящими на нечётных местах https://www.cyberforum.ru/ turbo-pascal/ thread1416558.html |
В квадратной матрице A поменять местами два столбца с заданными номерами Turbo Pascal Здравствуйте уважаемые программисты ! Помогите мне пожалуйста с задачей . В квадратной матрице A поменять местами два столбца с заданными номерами; сформировать диагональную матрицу C из сумм элементов столбцов матрицы A ;если среди элементов главной диагонали C нет равных , найти ее след , в противном случае вычесть из C единичную матрицу . |
Turbo Pascal Построить алгоритм, составить и отладить программу для нахождения произведения ряда var i:integer; n,p,u:real; begin i:=2; p:=1; u:=exp((-4)*ln(10)); repeat n:=n+(1/exp((2)*ln(i))); P:=p*(1-n); until n<u; Writeln('P = ',p); https://www.cyberforum.ru/ turbo-pascal/ thread1416388.html |
Turbo Pascal Вывести на экран монитора условное графическое изображение фотоэлемента солнечного 1. Очистить экран монитора и при необходимости установить нужный цвет фона. 2. Вывесты одно или несколько условных графических изображений электрических компонентов с произвольным цветом, размером и начальным положением. 3.Скопировать изображение с экрана монитора в буфер. 4.Удалить изображение с экрана монитора. 5. Скопировать изображения из буфера на екркан монитора в другое место. ... https://www.cyberforum.ru/ turbo-pascal/ thread1416296.html |
Turbo Pascal Определить недостающий "end;" в коде Где-то нехватает end; немогу понять где program divkarssaistits_saraksts_bez_BR; uses crt; const MaxSize = 15; type Count = 0..MaxSize; StdElement = record |
Turbo Pascal Добавить элементы второй последовательности в нужные места первой, чтобы она осталась неубывающей
https://www.cyberforum.ru/ turbo-pascal/ thread1416265.html Пусть даны неубывающая последовательность действительных чисел и произвольная последовательность действительных чисел. Требуется указать те места, на которые нужно вставлять элементы второй последовательности в первую последовательность так, чтобы новая последовательность оставалась возрастающей. вот программа она только объединяет последовательности,но не выводит места. uses crt; const... |
Turbo Pascal Построение графика функции на заданном интервале 1. Очистить экран монитора и при необходимости установить требуемый цвет фона. 2. Выбрать размещение системы координат в соответствии с левым и правым интервалом и в соответствии с минимальным и максимальным значением функции, которыемогут быть достигнуты на этоминтервале. 3. Построить горизонтальную и вертикальную координатные оси. 4. Подписать названия координатных осей. 5.... https://www.cyberforum.ru/ turbo-pascal/ thread1416260.html |
В массиве из N чисел - радиусов окружностей, выделить те, для которых площади окружностей S >= 100 Turbo Pascal В массиве из N чисел( N и числа вводятся с клавиатуры и представляют собой r окружностей) выделить те,для которых площадь S>=100 и подсчитать их количество k |
Turbo Pascal Сформировать три матрицы по правилам Сформировать матрицы A,B,C: а(i,j)={5, j=2; y, j не равно 2}; b(i,j)={3j, i=5; 2, i не равно 5}; c(i,j)={i/j, j не равно 1, 0, j=1} и выполнить (A+B)^T*C https://www.cyberforum.ru/ turbo-pascal/ thread1416168.html |
Модератор
|
|
09.04.2015, 23:54 | 0 |
Что такое div и mod - Turbo Pascal - Ответ 746055209.04.2015, 23:54. Показов 5820. Ответов 8
Метки (Все метки)
Ответ
Да, именно так.
В паскале цикл for счетчик:=нач_значение to кон_значение do оператор; выполняется так: 1) вычисляется нач_значение и кон_значение 2) счетчик получает нач_значение 3) если счетчик больше кон_значение, выход из цикла 4) иначе выполняется оператор 5) значение счетчика увеличивается на 1 6) переход к (3) Для цикла for счетчик:=нач_значение downto кон_значение do оператор; отличия в шагах 3) если счетчик меньше кон_значение, выход из цикла 5) значение счетчика уменьшается на 1 Оператор if условие then оператор; выполняется просто, если условие истинно, выполняется оператор. По шагам: i=0, вычисляется (0 mod 2) -> 0, вычисляется (0=0) -> True, выполняется Write(0,' '), i=1, вычисляется (1 mod 2) -> 1, вычисляется (1=0) -> False, i=2, вычисляется (2 mod 2) -> 0, вычисляется (0=0) -> True, выполняется Write(2,' '), i=3, вычисляется (3 mod 2) -> 1, вычисляется (1=0) -> False ... i=20, вычисляется (20 mod 2) -> 0, вычисляется (0=0) -> True, выполняется Write(20,' ') Ну а остаток от деления -- достаточно вспомнить школьное деление в столбик: 19 mod 2, берем 9, 9*2=18, 19-18=1 или m mod n = m-(m div n)*n Вернуться к обсуждению: Что такое div и mod Turbo Pascal
1
|
09.04.2015, 23:54 | |
Готовые ответы и решения:
8
вычислить A:= 4*7 mod 5 div 2/3 - trunc(0.724) B:= Abs (round (5/2)-7 div 15+8 mod 9) Что такое div и mod? Доказать,что число 121,является полиндромом. Через div и mod? Доказать что число 3535 является полиндромом! Через div и mod. |
09.04.2015, 23:54 | |
09.04.2015, 23:54 | |
Помогаю со студенческими работами здесь
0
Div/mod div, mod Что такое mod? Что такое mod в с++ ? |