|
|
Другие темы раздела | |
Turbo Pascal магический квадрат
https://www.cyberforum.ru/ turbo-pascal/ thread383749.html Помогите решить задачу Определить, является ли матрица 9-го порядка магическим квадратом, т.е такой в котором суммы элементов всех строк и столбцов одинаковы Добавлено через 1 минуту Вот как я ее решил, только мне кажется что условие "IF" можно укоротить, но незнаю как. Program pr; uses crt; Var a:array of integer; x,y,i,j:integer; s: array of integer; c,s1:integer; |
Поиск слов в строке Turbo Pascal Составить программу, которая читает произвольные строки длиной 80 символов, разбивает их по словам (подстрока между двумя пробелами), находит максимальное слово и выводит его на печать. Ввод строк заканчивается вводом символа ‘!’, который не является элементом строки. |
Turbo Pascal Циклы
https://www.cyberforum.ru/ turbo-pascal/ thread383707.html Вычислить значения функции sqrt (x+1) на отрезке |
Turbo Pascal В каждом слове текста замените "а" на букву "е"
https://www.cyberforum.ru/ turbo-pascal/ thread383675.html В каждом слове текста замените "а" на букву "е", если "а" стоит на четном месте, и заменить букву "б" на сочетание "ак", если "б" стоит на нечетном месте. Вот мой код , но символ "б" заменяется не правильно, с заменой "a" все нормально. Добавлено через 8 минут PROGRam laba5; var st,s1,s2,s3:string;i:integer; begin st:=''; writeln('vvedite stroku'); readln(st); |
Turbo Pascal Строки, записи, множества. Напечатать символы, которые встречаются более одного раза. Здравствуйте, помогите пожалуйста решить задачку. Пусть задана произвольная последовательность символов. При- знак конца последовательности – точка. Напечатайте те символы, которые встречаются в данной последовательности более одного раза. Заранее спасибо |
Turbo Pascal Определить новый курс корабля Господа, помогите решить непосильную для меня задачу. Звучит она вот так: Корабль сначала шёл по заданному курсу(север,восток,юг,запад). Затем его курс был изменён согласно заданному приказу(вперёд, вправо,назад,влево). Определить новый курс корабля. Главное условие, что бы программа была написана с помощью оператора case. Ну соответственно на pascal. Я уже весь мозг сломал. В... https://www.cyberforum.ru/ turbo-pascal/ thread383542.html |
Turbo Pascal Факториал Ребят помогите плз с примерчиком Разработать программу для определения и вывода на экран значения функции y=f(x). Исходное значение n.m ввести с клавиатуры f(x)=tg\sqrt{m!(n+3}) f(x)=tg\sqrt{m!(n+3}) Заранее спасибо, помогите пожалуйста, у меня куча примеров, по аналогии я сделаю остальные просто https://www.cyberforum.ru/ turbo-pascal/ thread383532.html |
Turbo Pascal Нарисовать птицу рисунок составлен из простейших геометрических фигур, получить на экране и раскрасить https://www.cyberforum.ru/attachment.php?attachmentid=106692&stc=1&d=1321259704 |
Turbo Pascal Обменяйте местами фамилии брокеров: первого и последнего, второго и предпоследнего Задан список фамилий брокеров товарной биржи из N человек. Обменяйте местами фамилии брокеров: первого и последнего, второго и предпоследнего, третьего от начала и третьего от конца и.т.д. составить программу паскале и блок схемы!!! https://www.cyberforum.ru/ turbo-pascal/ thread383520.html |
Turbo Pascal Нарисовать рисунок, похожий на конверт
https://www.cyberforum.ru/ turbo-pascal/ thread383511.html рисунок составлен из простейших геометрических фигур, получить на экране и раскрасить ->рисунок<- |
Задача на нахождение взаимно обратных чисел Turbo Pascal Написать программу для определения наличия в заданной последовательности из трех натуральных чисел хотя бы двух взаимно обратных чисел. При наличии указать эти числа.Числа вводить с клавиатуры. |
Turbo Pascal Сумму элементов главной диагонали поделить на сумму элементов побочной
https://www.cyberforum.ru/ turbo-pascal/ thread383501.html В матрице A сумму элементов, находящихся над главной диагональю, поделить на сумму элементов, находящихся под побочной диагональю. Числа на побочной диагонали рассортировать по убыванию и выделить цветом при выводе матрицы. |
141 / 110 / 30
Регистрация: 20.04.2011
Сообщений: 582
|
|
0 | |
Сравнение вещественных чисел - Turbo Pascal - Ответ 217038614.11.2011, 17:59. Показов 13150. Ответов 4
Метки (Все метки)
А как правильно сравнивать (<>, =) вещественные числа?
Вернуться к обсуждению: Сравнение вещественных чисел Turbo Pascal
0
|
14.11.2011, 17:59 | |
Готовые ответы и решения:
4
Сравнение вещественных чисел Квадрат, сравнение вещественных чисел. Найти суммы двух случайных чисел. a) целых чисел из диапазона от 50 до 100 b) вещественных чисел от 3х с половиной до 8 Сравнение вещественных чисел |
14.11.2011, 17:59 | |
14.11.2011, 17:59 | |
Помогаю со студенческими работами здесь
0
Сравнение вещественных чисел Сравнение вещественных чисел Сравнение вещественных чисел Сравнение двух вещественных чисел |