|
|
Другие темы раздела | |
Turbo Pascal Найти частичную сумму ряда
https://www.cyberforum.ru/ turbo-pascal/ thread981125.html Помогите, вроде как сделал, но мне кажется, что это не то Ряд: 1+1/2+1/4+1/8+... Найти частичную сумму ряда. Ряд сходится к значению 2. s в цикле почему-то 6 раз становится значением 2, потом только выходит. program zadacha; var b,s,a:real; begin b:=1; s:=0; while s<2 do |
Turbo Pascal Задача на количество цифр Найти количество цифр в целом числе,заданном с клавиатуры.Максимальное количество цифр-6. 1)составить и отладить программу 2)проверить на тестовых данных:156;2368;56732;168904 Помогите пожалуйста,буду очень благодарен :) |
Turbo Pascal Как настроить турбо паскаль, модуль - graph
https://www.cyberforum.ru/ turbo-pascal/ thread981113.html Написал программу в ТП 7.0, ошибок не выдал, модуль подключил, но как только я запускаю программу, окно открывается, ждет 2 сек и закрывается. Дайте мне подробную инструкцию по настройке ТП 7.0 для работы с графами. И вот код для pascal abc net, как его перевести в код для ТП 7.0 ? program lab9; uses GraphABC; var ar: array of point; xP,yP:integer; begin xP:=300; |
Turbo Pascal X/Y было наибольшим возможным
https://www.cyberforum.ru/ turbo-pascal/ thread981085.html Вам дано N чисел. Выберите из них такие два x и y, чтобы их частное x/y было наибольшим возможным. Входные данные: В первой строке входного потока находится одно целое число N - общее количество чисел (2 <= N <= 30 000). В следующей строке входного потока находятся N целых чисел a1, a2, ... , aN; числа не превосходят по модулю 30 000. Гарантируется, что среди этих чисел хотя бы одно не равно... |
Turbo Pascal Вывести каждую вторую букву алфавита Нужно вывести каждую вторую букву алфавита . |
Turbo Pascal Работа с файламы Может кто нибудь помочь мне с программой. У меня тут проблема в том, что когда программа запускаю у меня меню 2 должен работать с данными которые я вёл первый раз (т.е без ввода данных (без меню 1)). Мне тут надо ввести в экран все элементы до 1-го чётного program p1; uses crt; var f:file of integer; n,i,j,k:integer; c:integer; p:byte; a:array of integer; Procedure... https://www.cyberforum.ru/ turbo-pascal/ thread981066.html |
Turbo Pascal код Хемминга Определить, сколько информационных и сколько проверочных символов имеется в кодовом слове Хемминга длиной n https://www.cyberforum.ru/ turbo-pascal/ thread981054.html |
Turbo Pascal По введенным координатам 3 точек на плоскости вычислить определить соответствующий треугольник По введенным координатам 3 точек на плоскости вычислить определить соответствующий треугольник (если это возможно), вычислив величины его углов, периметр и площадь. Указание: Точки задавать, используя записи с двумя полями (вещественного типа), вывод результатов организовать таблицей следующего вида. Самостоятельно найти способ прорисовки рамок таблицы и округления входящих в нее значений... |
Turbo Pascal Составить из символов слово
https://www.cyberforum.ru/ turbo-pascal/ thread980961.html Запрашивая у пользователя произвольные символы,пока не будет введен пробел,составить из них слово и подсчитать количество символов в слове. |
Turbo Pascal В произвольной последовательности чисел подсчитать количество положительных и отрицательных элементов в произвольной последовательности чисел подсчитать количество положительных и отрицательных элементов. https://www.cyberforum.ru/ turbo-pascal/ thread980950.html |
Turbo Pascal Олимпийские игры - Определить страну-победителя Опишите заданный тип, осуществите ввод данных, произведите определенные операции и выведите на печать значение полей (где возможно). Во всех случаях используйте массив из записей. Данные о неофициальном командном зачете на Олимпийских играх: страна, количество участников, количество золотых, серебряных и бронзовых медалей. Определить страну-победительницу, считая, что за первое место дается три... |
Turbo Pascal Получить количество членов данной последовательности, которые больше предыдущего члена, но меньше последующего.
https://www.cyberforum.ru/ turbo-pascal/ thread980885.html Даны: натуральное число n, действительные числа a1,a2 ... An. Получить количество членов данной последовательности, которые больше предыдущего члена, но меньше последующего. |
1 / 1 / 4
Регистрация: 16.10.2011
Сообщений: 29
|
|
21.10.2013, 01:43 [ТС] | 0 |
Определить количество целых корней уравнения - Turbo Pascal - Ответ 521170921.10.2013, 01:43. Показов 1037. Ответов 1
Метки (Все метки)
Ответ
По идее нужно вот это http://pro-ucheba.com/uploads/... 4-U729.gif как-то переделать под моё условие, то есть отобрать из вещественных целые, и вывести их количество, как-то так, а по другому, я даже не знаю
Вернуться к обсуждению: Определить количество целых корней уравнения Turbo Pascal
0
|
21.10.2013, 01:43 | |
Готовые ответы и решения:
1
Найти количество целых корней кубического уравнения Нахождение корней уравнения Нахождение корней уравнения Определить количество целых положительных элементов массива |
21.10.2013, 01:43 | |
21.10.2013, 01:43 | |
Помогаю со студенческими работами здесь
0
Определить количество целых чисел среди введенных Нахождение корней квадратного уравнения Вычисление корней квадратного уравнения Вычисление корней квадратного уравнения |