|
|
Другие темы раздела | |
Pascal ABC Определить, через сколько часов лыжник преодолеет более 33 км? Помогите пожалуйста с задачей. В первый час лыжник проходит 8 км. Каждый следующий час его скорость снижается на 10%. Через сколько часов он преодолеет более 33 км? https://www.cyberforum.ru/ pascalabc/ thread1762776.html |
В одномерном массиве определить число соседств двух чисел разного знака Pascal ABC Дан одномерный числовой массив. Определить в нём число соседств двух чисел разного знака. |
Pascal ABC Найти все пары дружественных чисел, оба из которых принадлежат промежутку от M до N
https://www.cyberforum.ru/ pascalabc/ thread1762747.html Два различных натуральных числа называются дружественными, если первое из них равно сумме делителей второго числа, за исключением самого второго числа, а второе равно сумме делителей первого числа, за исключением самого первого числа. Требуется найти все пары дружественных чисел, оба из которых принадлежат промежутку от M до N. Входные данные В первой строке находятся числа M и N. 1 <= M <= N... |
Pascal ABC Построение кривых высших порядков
https://www.cyberforum.ru/ pascalabc/ thread1762729.html Построить кривую |
Составьте программу для вычисления площади трапеции по известным основаниям и высоте Pascal ABC задача с модулем составьте программу для вычисления площади трапеции по известным основаниям и высоте. Данные вводиться в основной программе, нахождение площади реализовать в виде функции |
Pascal ABC Процедура поиска в глубину в графе, заданном списками инцидентности
https://www.cyberforum.ru/ pascalabc/ thread1762559.html Нужна помощь знающего Паскаль человека, по заданию: Напишите и используйте в программе процедуру поиска в глубину в графе, заданном списками инцидентности. Выведите на экран номера вершин в том порядке, в котором они просматриваются процедурой. Буду очень признателен за помощь! |
Pascal ABC Найти маршрут с минимальным весом
https://www.cyberforum.ru/ pascalabc/ thread1762451.html Задача "Сеть" В Тьму-тараканьском государственном университете (ТГУ) решили построить компьютерную сеть, которая охватила бы все N корпусов университета. Однако денег, как всегда, не хватало, и сеть получилась разнородной: некоторые корпуса были связаны быстрыми каналами, другие-медленными, а между некоторыми зданиями прямых линий не было вообще. Аспиранту Пете, компьютер которого стоял в... |
Составьте программу для вычисления площадей трех колец Pascal ABC задача с модулем составьте программу для вычисления площадей трех колец. Непосредственно площадь кольца вычисляет и выводит процедура ring. Значения радиусов запрашиваются в основной программе |
Pascal ABC Нарисовать папоротник с помощью рекурсии Нарисовать папоротник с помощью рекурсии https://www.cyberforum.ru/ pascalabc/ thread1762370.html |
Pascal ABC задачи
https://www.cyberforum.ru/ pascalabc/ thread1762367.html подскажите с написанием программ |
Нарисовать паркет, используя процедуры Pascal ABC Нарисовать паркет с помощью процедуры |
Pascal ABC Посчитать, на сколько сантиметров увеличился радиус шляпки каждого гриба после завершения дождя
https://www.cyberforum.ru/ pascalabc/ thread1762271.html Задача: Грибной дождь (Время: 1 сек. Память: 16 Мб Сложность: 30%) На лесной опушке растет дружная семейка грибов. Местоположение каждого гриба задается координатами X, Y, а шляпка гриба имеет радиус R. Когда идет дождь, радиус шляпки каждого гриба непрерывно и равномерно увеличивается cо скоростью 1 сантиметр в минуту. Когда дождь заканчивается (а он идет не более Т минут), шляпки прекращают... |
Модератор
|
|
20.06.2016, 15:10 | 0 |
Напечатать элементы файла f в следующем порядке: сначала – все числа, меньшие a, затем – все числа из отрезка - Pascal ABC - Ответ 929411020.06.2016, 15:10. Показов 2956. Ответов 13
Метки (Все метки)
Ответ
Добавьте ReadLn; перед end., будет ждать нажатия Enter.
Файл-то есть, а значения в нем у вас есть? Прогон (чуть изменил формат вывода на более компактный): Код
68.63 99.59 67.18 80.94 12.86 34.06 3.33 66.32 92.11 38.16 92.96 10.09 38.57 56.07 48.42 5.92 55.12 49.97 94.23 19.59 Код
a, b: 10 40 3.33 5.92 12.86 34.06 38.16 10.09 38.57 19.59 68.63 99.59 67.18 80.94 66.32 92.11 92.96 56.07 48.42 55.12 49.97 94.23 Вернуться к обсуждению: Напечатать элементы файла f в следующем порядке: сначала – все числа, меньшие a, затем – все числа из отрезка Pascal ABC
1
|
20.06.2016, 15:10 | |
Готовые ответы и решения:
13
Создать файл целых чисел. Напечатать сначала все одноцифровые числа, а затем - все остальные Переставить элементы в массиве так, чтобы сначала следовали все отрицательные числа, а затем все остальные Напечатать сначала все отрицательные числа последовательности, а затем — все положительные За один просмотр файла вывести сначала все числа, меньшие а |
20.06.2016, 15:10 | |
20.06.2016, 15:10 | |
Помогаю со студенческими работами здесь
0
Записать в файл все нечетные числа из [1; 99]. Затем вывести все элементы данного файла, начиная с 15 Записать в массив сначала все положительные, затем все отрицательные числа и нули Записать в массив сначала все положительные числа, затем все остальные, сохраняя порядок Вывести все нулевые элементы, затем все положительные элементы в порядке возрастания, затем все отрицательн |