С Новым годом! Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
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 - Ответ 2170386

14.11.2011, 17:59. Показов 13150. Ответов 4
Метки (Все метки)

Author24 — интернет-сервис помощи студентам
А как правильно сравнивать (<>, =) вещественные числа?

Вернуться к обсуждению:
Сравнение вещественных чисел Turbo Pascal
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
14.11.2011, 17:59
Готовые ответы и решения:

Сравнение вещественных чисел
USES CRT; begin clrscr; if 0.3*3&lt;&gt;0.9 then writeln (0.3*3,'&lt;&gt;',0.9); readln; end. ...

Квадрат, сравнение вещественных чисел.
Помогите, не могу врубиться в задание (перевожу с Латышского дословно) поэтому может получиться...

Найти суммы двух случайных чисел. a) целых чисел из диапазона от 50 до 100 b) вещественных чисел от 3х с половиной до 8
помогите решить Найти суммы двух случайных чисел. a) целых чисел из диапазона от 50 до 100 b)...

Сравнение вещественных чисел
И так, всем понятно (надеюсь) что код ниже выведет false. Как сравнить эти два числа, используя...

4
14.11.2011, 17:59
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
14.11.2011, 17:59
Помогаю со студенческими работами здесь

Сравнение вещественных чисел
Привет, ребят! Нужна ваша мудрость. На днях думал о реализации класса complex&lt;class scalar&gt; из...

Сравнение вещественных чисел
Будто бы простая задача: сравнить два действительных числа в стеке, то, которое является меньшим -...

Сравнение вещественных чисел
Помоготе пожалуйста с задачкой. Нужно сравнить 2 вещественных числа и записать в переменную как...

Сравнение двух вещественных чисел
Почему не работает сравнение при числах: 2.85730505 2.85729861 bool isEqual( float x, float y...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru