|
|
Другие темы раздела | |
Pascal ABC Вычисление факториалов целых чисел от 1 до 5
https://www.cyberforum.ru/ pascalabc/ thread1138843.html Напишите программу вычисления факториалов целых чисел от 1 до 5. Напечатайте результаты в табличном формате. |
Pascal ABC Перестроить программу используя рекурсивную процедуру Есть программа, нужно что бы она работала через рекурсивную процедуру или функцию. Код: program 123; var k,n,x:integer; s,t:real; begin writeln('Введите n'); readln(n); writeln('Введите x'); readln(x); |
Pascal ABC Задан целочисленный массив. Если индекс максимального элемента нечётный, то массив необходимо сжать Помогите пожалуйста!!! 2) Задан целочисленный массив. Если индекс максимального элемента нечётный, то массив необходимо сжать, удалив из него все чётные элементы. Оставшиеся позиции заменить нулями. https://www.cyberforum.ru/ pascalabc/ thread1138600.html |
Pascal ABC Множини,записи,рядки,їх використання
https://www.cyberforum.ru/ pascalabc/ thread1138551.html Допоможіть будь ласка!!:help: 1. Ввести множину, запис або рядок за допомогою клавіатури. 2. Вивести на екран монітора вихідну множину, запис або рядок. 3. Виконати необхідні перетворення над вихідною множиною, записом або рядком, а також виконати необхідні обчислення. 4. Вивести на екран монітора перетворену множину, запис або рядок, а також вивести результати обчислення. ЗАВДАННЯ... |
Pascal ABC Ввести с клавиатуры некоторый массив. Затем осуществить проверку элементов массива на чётность Помогите пожалуйста!!! 1) Необходимо ввести с клавиатуры некоторый массив. Затем осуществить проверку элементов массива на чётность. Необходимо чётные элементы увеличить вдвое, а нечётные увеличить на 1. Результирующий массив вывести на экран. |
Pascal ABC Преобразовать файл таким образом, чтобы каждый оператор располагался на отдельной строке Для программы, записанной в файле в виде непрерывного текста, преобразовать файл таким образом, чтобы каждый оператор располагался на отдельной строке. https://www.cyberforum.ru/ pascalabc/ thread1138492.html |
Pascal ABC Принадлежность точки заштрихованной области. Проверка: возможен ли треугольник с такими сторонами
https://www.cyberforum.ru/ pascalabc/ thread1138485.html Я понимаю,что я не один такой,который просит,чтобы решили задачу по Паскаль,дело в том,что задали много задач по этому языку. И у меня уже голова не варит,я сделал больше половины,а дальше уже не соображаю.Помогите пожалуйста. Задача 1. Точка А задана координатами X,Y. Написать программу, которая выводит слово «Принадлежит», если точка принадлежит заштрихованной области (см. рисунок 1) и... |
Написать программу, которая открывает файл 1.000.000 раз Pascal ABC Напишите програму которая открывает файл 1.000.000 раз плюс должен быть там путь к файлу! |
Pascal ABC Найти максимум каждой строки матрицы. Из полученных максимумов найти минимум
https://www.cyberforum.ru/ pascalabc/ thread1138425.html Здрасьте. Есть очередная задача, которую , как догадываетесь, я не могу решить. И вот, дан массив из 6 строк и 6 столбцов. Программа должна находить максимум с каждой строки и в итоге найти минимум из этих 6-ти максимумов. Вот код в паскале: program srfwref1; var T,T2: array of integer; k,j,N, max:integer; begin readln(N); for K:=1 to N do |
Pascal ABC Дан список, содержащий не менее 15 записей Мне нужна программа в Паскале с меню к данному заданию. Аэропорт Дан список, содержащий не менее 15 записей, каждая из которых имеет структуру: Номер рейса тип integer Пункт отправления https://www.cyberforum.ru/ pascalabc/ thread1138398.html |
Часы со стрелками, Ошибка в процедуре Pascal ABC Делал часы (часовую стрелку еще не доделал) и столкнулся с проблемой удаления (закрашивания в белый цвет) предыдущей стрелки) uses GraphABC,Utils,crt; var gd,gm,x,y:integer; k:char; hour,min,sec,hund:word; d:datetime; procedure sekunda(secu:word); // секунда var x1,y1:integer; const rs=180; |
Pascal ABC Как вычислить минимум из нескольких чисел? И максимум тоже?
https://www.cyberforum.ru/ pascalabc/ thread1138355.html Как вычислить минимум из нескольких чисел? И максимум тоже? |
2 / 2 / 0
Регистрация: 12.01.2014
Сообщений: 16
|
|
04.04.2014, 16:07 | 0 |
Даны три целых числа, найти среднее из них - Pascal ABC - Ответ 599903604.04.2014, 16:07. Показов 2863. Ответов 1
Метки (Все метки)
Ответ
Ну, и в чём проблема? Одномерный массив, состоящий из 3-х элементов.Пусть A - эл-т массива, i-порядковый номер, находишь maх и min через цикл, а потом через условие if находишь средний элемент по значению.
Вернуться к обсуждению: Даны три целых числа, найти среднее из них Pascal ABC
0
|
04.04.2014, 16:07 | |
Готовые ответы и решения:
1
Даны три целых числа, найти среднее из них Даны три целых числа, найти среднее из них. Средним называется число, которое больше наименьшего из данных чисел, но меньше наибольшего Даны три числа. Найти наименьшее из них. Даны три числа. Надо найти суммы двух больших из них |
04.04.2014, 16:07 | |
04.04.2014, 16:07 | |
Помогаю со студенческими работами здесь
0
Даны три целых числа. Найти сумму двух наибольших из них Даны три числа. Найти среднее из них (то есть число, расположенное между наименьшим и наибольшим) Даны три действительных числа. Выбрать из них те, которые принадлежат интервалу (1,3) и найти большее из них Даны три числа. Найти наименьшее из них. |