|
|
|
| Другие темы раздела | |
| Turbo Pascal Как найти второй по величине элемент массива? Дана задача и в ней надо найти максимальный элемент и элемент второй по величине. Максимальный найти могу сам, а вот второй... Помогите, пожалуйста https://www.cyberforum.ru/ turbo-pascal/ thread2323782.html |
Turbo Pascal Переставить элементы массива по схеме Дана целочисленная таблица A. Переставить в ней эементы по следующей схеме: A1 A2 A3 A4 A5 A6 A7 A6 A7 A1 A2 A3 A4 A5 Помогите, пожалуйста |
|
Turbo Pascal Из локальных в глобальные
https://www.cyberforum.ru/ turbo-pascal/ thread2323271.html Помогите переделать ил локальных в глобальные uses crt; Const Rows=6; Cols=6; Type myArray = array of integer; |
Turbo Pascal Напечатать чётные положительные элементы одномерного массива
https://www.cyberforum.ru/ turbo-pascal/ thread2322879.html По моему из Интернета была выловлена программа на тему: Напечатать чётные положительные элементы одномерного массива. Остальные элементы массива обнулить. Из этой программы я попытался сделать расширенный вариант – в одной программе сделать три массива: 1- й массив – исходный; 2 - й массив – обнулить нечётные числа и чтобы нули были на своих соответствующих местах. 3 – й... |
|
Арифметический сдвиг влево на k позиций Turbo Pascal Арифметический сдвиг влево на k позиций (k < n) Из порядковых чисел. Uses Crt; Const n = 8; k = 3; Var A:array of Integer; I: Integer; Begin ClrScr; For i:= 1 to n do begin A:= I; |
Turbo Pascal Напечатать чётные положительные элементы двумерного массива Напечатать чётные положительные элементы двумерного массива Остальные элементы массива обнулить. Из этой программы я попытался сделать расширенный вариант – в одной программе сделать три массива: 1- й массив – исходный; 2- й массив – обнулить чётные положительные числа в чётных рядах и чтобы нули были на своих соответствующих местах; 3 – й массив – обнулить только нечётные ... https://www.cyberforum.ru/ turbo-pascal/ thread2322876.html |
| Turbo Pascal Определить минимальное количество купюр, необходимое для покупки Часто граждане пытаются выяснить, насколько богатыми являются депутаты. Некоторые верят, что материальное положение отдельных депутатов являются неограниченными. Поэтому представьте себе депутата, у которого есть неограниченное количество купюр всех номиналов (1, 2, 5, 10, 20, 50, 100, 200, 500 рублей). Он хочет приобрести подарок для своей тещи, что стоит N рублей. Несмотря на то, что наш герой... https://www.cyberforum.ru/ turbo-pascal/ thread2322732.html |
Дана двумерная матрица, найти сумму четных по столбцам и нечетных по строкам.Найти и вывести Turbo Pascal Дана двумерная матрица, найти сумму четных по столбцам и нечетных по строкам.Найти и вывести.Помогите пожалуйста!! |
|
Turbo Pascal Как вывести массив на экран рядами с определенным количеством элементов в каждом?
https://www.cyberforum.ru/ turbo-pascal/ thread2322655.html Задание такое: отсортировать массив по возрастанию его модулей методом простого выбора. Отсортированные элементы массива вывести на экран рядами, в каждом из которых должно быть по 7 элементов. Вывод разделить пустыми рядами. Я массив отсортировал, а как вывести, не знаю. Помогите, пожалуйста |
Turbo Pascal Разместить элементы массива так,чтоб сначала шли все положительные числа,а потом-отрицательные, не создавая новый массив
https://www.cyberforum.ru/ turbo-pascal/ thread2322653.html Дан массив из n целых чисел. Не используя новый массив, нужно разместить элементы массива так, чтобы сначала шли все положительные числа, а потом - отрицательные. Помогите, пожалуйста |
|
Определить количество аттракционов, на которых удастся прокатится Turbo Pascal Маричка говорила, что в субботу пойдет вместе с Зеник на олимпиаду по программированию. Зеник пришел, а Марички нету, обманула, подвела! Вместо олимпиады Маричка решила пойти в местный парк аттракционов. Для того, чтобы посетить наибольшее количество аттракционов, Маричка начнет с самого дешевого аттракциона, затем прокатится на втором дешевом и так далее, пока у нее хватит денег. Заметьте, что... |
Turbo Pascal Turbo Pascal и инициализированные переменные
https://www.cyberforum.ru/ turbo-pascal/ thread2322491.html const s: String='389595742'; var i: Integer; begin for i:=Length(s) downto 1 do if Odd(i) then Delete(s,i,1); for i:=1 to Length(s) do if Odd(Ord(s)) then Dec(s) else Inc(s); WriteLn(s); end. |
|
0 / 0 / 0
Регистрация: 21.09.2018
Сообщений: 5
|
|
| 0 | |
Логической переменной R присвоить логическое выражение, реализующее указанное условие - Turbo Pascal - Ответ 1291486821.09.2018, 18:30. Показов 652. Ответов 3
Метки (Все метки)
логической переменной R присвоить логическое выражение,реализующее условие,указанное в варианте. число х является трехзначным и содержит цифру 0 Вернуться к обсуждению: Логической переменной R присвоить логическое выражение, реализующее указанное условие Turbo Pascal
0
|
|
| 21.09.2018, 18:30 | |
|
Готовые ответы и решения:
3
Присвоить логической переменной t значение true, если выполняется логическое условие По логической схеме составить логическое выражение Аналитически упростить логическое выражение до одной логической операции
|
| 21.09.2018, 18:30 | |
| 21.09.2018, 18:30 | |
|
Помогаю со студенческими работами здесь
0
Логическое выражение из переменной в блоке If .. Then Присвоить логической переменной результат сравнения модулей сумм положительных и отрицательных элементов
Логической переменной присвоить значение true, если точка принадлежит заштрихованной области |