|
|
Другие темы раздела | |
Pascal ABC Написать программу про избирателей от каждой партии
https://www.cyberforum.ru/ pascalabc/ thread1438289.html Программа для результатов голосования На будущее: текст на картинках не допускается |
Отредактировать программу, которая уточняет корень полинома методом касательных Pascal ABC Помогите,пожалуйста, соединить две программы в одну. И подскажите как можно отредактировать программу, которая уточняет корень полинома методом касательных ,чтоб была возможность задавать функцию и производную через write. Метод касательных: Var x,a,b,e:real; k:integer; Function f1(x:real):real; begin f1:=5*sqr(x)*sqr(x)+3*sqr(x)*x+9*sqr(x)+4*x; end; Function f2(x:real):real; |
Pascal ABC Определить среднюю из трех заданных дату рождения
https://www.cyberforum.ru/ pascalabc/ thread1438257.html даны 3 календарные даты, которые представляют собой даты рождения трех друзей: Дмитрия, Ивана и Олега. Напишите программу, которая определяет и выводит на экран имя среднего из них. |
Pascal ABC В исходный файл вывести единственную строку, в которой имеется расшифрованное сообщение
https://www.cyberforum.ru/ pascalabc/ thread1438203.html Всем доброго времени суток, у меня такое задание... Помогите пожалуйста кому не сложно . В первой строке входящих данных записано закодированное сообщение, которое состоит только с натуральных чисел и числа 0. Каждое число n (n>3) означает ту букву, которая идет под номером (n-3) в русском алфавите. Число 0 значит пропуск. В закодированном сообщении могут появится 0, которые должны быть... |
Pascal ABC Составить программу вывода на экран графического изображения уравнении составить программу вычисления на заданных отрезках корни нелинейных уравнении методом Ньютона и вывести на экран графические изображения этих уравнении. Количество точек графика определить самостоятельно. |
Pascal ABC При вводе любых символов (кроме "1" - "5") выводить ошибку
https://www.cyberforum.ru/ pascalabc/ thread1438101.html var x,y:integer; z:real; n:byte; begin writeln(' '); writeln('Введите длину отрезка: '); readln(x); writeln('Выберете единицу измерения: 1 — дециметр, 2 — километр, 3 — метр, 4 — миллиметр, 5 — сантиметр') ; readln(n); |
Pascal ABC Множества: вывести слова с нечетным количеством согласных букв
https://www.cyberforum.ru/ pascalabc/ thread1438069.html Дана строка, слова разделены любыми знаками препинания, Вывести слова с нечетным количествам согласных букв. Дай бог здоровья, тому кто решит. Помогите не к кому обратиться! |
Создание файла, содержащего сведения о машинах на складе, и работа с ним Pascal ABC Задачка 2. Создать файл содержащий сведения о машинах на складе. Каждая запись файла должна содержать марку машины, год выпуска, цвет, цена, дата продажи. Если дата продажи не задана, то машина не продана. В программе предусмотреть следующие режимы работы: добавление записи, редактирование записи, удаление записи, выдача списка всех проданных в текущем месяце машин. |
Pascal ABC Переписать в другой текстовый файл последовательность, заменив второй отрицательный элемент минимальным
https://www.cyberforum.ru/ pascalabc/ thread1438065.html Задачка. Создать текстовый файл в который ввести 20 вещественных чисел в диапазоне от -16 до 16. Вывести содержимое файла на экран. Переписать в другой текстовый файл эту последовательность, заменив второй отрицательный элемент минимальным. Содержимое этого файла вывести на экран. Если искомых данных нет то в файл написать соответствующее сообщение. |
Pascal ABC Подсчитать накопленную сумму студента и среднюю сумму Студент решил накопить денег на покупку сотового телефона, он отложил начальную сумму равную а1. Каждый день он докладывал в уже имеющуюся сумму, сумму денег равную d. В один из дней (n) он решил посчитать накопленную сумму и среднюю сумму всех денег, которые были. Помоги посчитать студенту. Ввод Начальную сумму денег у студента в первый день(-1000<a1<1000), сумму, на которую увеличивается... https://www.cyberforum.ru/ pascalabc/ thread1437938.html |
Pascal ABC Если очередной элемент массива чётный, то прибавь к нему первый, если нечётный — прибавить последний Дан одномерный массив состоящий из n элементов. Если очередной элемент чётный, то прибавь к нему первый, если нечётный - прибавить последний. Первый и последний элементы не изменять. |
Pascal ABC Добавление элемента к концу списка
https://www.cyberforum.ru/ pascalabc/ thread1437871.html Капец как срочно надо написать программу: (Все взял как в книге написано) Напишите алгоритм и программу на языке Паскаль, выполняющую каждую из операций упр. 4.2.4 применительно к циклическим спискам. Какой из них более эффективен для циклических списков и какой менее. Напишите алгоритм и программу на языке Паскаль, выполняющие следующие операции 1)Добавление элемента к концу списка... |
0 / 0 / 1
Регистрация: 26.04.2015
Сообщений: 52
|
|
0 | |
Выбрать четные числа файла, у которых последняя цифра отлична от нуля - Pascal ABC - Ответ 757228205.05.2015, 15:13. Показов 2404. Ответов 6
Метки (Все метки)
В файле data.txt записаны числа, сколько их – неизвестно. Выбрать четные числа, у которых последняя цифра отлична от нуля и записать их в файл output.txt
Использовать сортировку пузырьком! Вернуться к обсуждению: Выбрать четные числа файла, у которых последняя цифра отлична от нуля Pascal ABC
0
|
05.05.2015, 15:13 | |
Готовые ответы и решения:
6
Удалить из txt-файла четные числа, у которых последняя цифра отлична от нуля, и отсортировать полученный файл Удалить из массива все четные элементы, у которых последняя цифра 2 Удалить из массива все четные элементы, у которых последняя цифра 2 Удалить из массива все числа в которых последняя цифра 5 |
05.05.2015, 15:13 | |
05.05.2015, 15:13 | |
Помогаю со студенческими работами здесь
0
Удалить из файла все элементы в которых последняя цифра 3 Вывести на экран те числа у которых первая и последняя цифра одинаковая Найти все числа в последовательности, последняя цифра которых кратна 5 В диапазоне от N до М вывести все числа, последняя цифра которых равна K |