Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Pascal ABC Вычислить значение выражения https://www.cyberforum.ru/ pascalabc/ thread657517.html
2)вычислить b=\left|x-y \right|*({sin}^{2}z+tgz) где x=17.421, y=10.400, z=0.828 решите пожалуйста, срочно, буду очень благодарен, заранее спасиб!
Pascal ABC Сортировка бд
Всем добрый вечер. Мне надо сделать сортировку бд типизированого файла и сохранить его. Дарова всем. Мне надо сделать сортировку бд тепизированого файла и сохранить его.Убедительная просьба следить за речью.
Pascal ABC Вычислить выражение 2)вычислить a={2}^{(y)}+{({3}^{x})}^{y} b=\frac{\left|x-y \right|\left(\frac{1+{sin}^{2}z}{x+y} \right)}{{e}^{\left|x-y \right|}+\frac{x}{2}} где х=3,251, у=0,325, z=0,466 решите пожалуйста, срочно, буду очень благодарен, заранее спасиб! https://www.cyberforum.ru/ pascalabc/ thread657466.html Pascal ABC Вычисление стоимости поездки https://www.cyberforum.ru/ pascalabc/ thread657435.html
1) Вычислить стоимость поездки на автомобиле до определённого пункта и обратно. Исходными данными являются: расстояние до пункта в км., потребное бензина на 100 км. пробега, цена одного литра бензина. решите пожалуйста, срочно, буду очень благодарен, заранее спасиб!
Вывести самую длинную строку файла Pascal ABC
Дан текстовый файл f. Вывести самую длинную строку файла. Если в файле имеется несколько строк с наибольшей длиной, то получить одну из них. Обязательно файловые диалоги (открыть,сохранить),uses forms abc. Кто может пожалуйста всю прогу.Если нет,то кусок кода именно со строками.
Pascal ABC Определить, верно ли, что в записи числа есть две одинаковые цифры https://www.cyberforum.ru/ pascalabc/ thread657339.html
1.Ввести целое число и определить. верно ли, что в его записи есть две одинаковые цифры. 2.Найти сумму элементов последовательности с точностью 0,001: Ответ: S=1.157 3.Найти сумму элементов последовательности с точностью 0,001: ответ: S=1.220
Pascal ABC Вывести квадраты и кубы дести чисел следующей последовательности https://www.cyberforum.ru/ pascalabc/ thread657333.html
Составьте,пожалуйста ,задачу с циклом. Заранее спасибо! Вывести квадраты и кубы дести чисел следующей последовательности:1,2,4,7,11,16...
Найти число Смита с номером N Pascal ABC
Задание: Составное число называется числом Смита, если сумма его цифр равна сумме цифр всех чисел, образующихся разложением исходного числа на простые множители. Найти число Смита с номером N. Вот что я написал, но программа не работает. Program Chislo_smita; function summa(a:integer):integer; {функция находит сумму цифр числа} var s1:integer; begin s1:=0; while a<>0 do
Pascal ABC Sin, cos и т.п https://www.cyberforum.ru/ pascalabc/ thread656841.html
Тема не совсем относится к паскалю. У меня в книге изредка есть коды с sin, cos,ln и т.д. Проблема в том, что алгебра и геометрия не хотят со мной "дружить". Хожу к репетитору по математике, но каждая новая тема дается с трудом. Вообщем к самой проблеме. Уже искал в интернете, что такое синусы, косинусы, но никак не пойму, что это вообще такое. Везде идут задачи с синусами и косинусами углов...
Pascal ABC Типы переменных https://www.cyberforum.ru/ pascalabc/ thread656745.html
Когда в программе записывают переменные указывают их тип, real, integer, boolean... Кому не сложно, напишите пожалуйста все виды переменных которые используются в паскале и написать когда именно пишется определенный тип переменной, просто я никак не могу понять когда нужно ставить определенный тип переменной. При компиляции почти всегда выдает ошибку "нельзя присвоить тип real к integer" или...
Pascal ABC Вывести на экран 10 раз сообщение
Вывести на экран 10 раз сообщение"Я понял,что такое циклы" честно,в паскале дуб-дуб,объясните как это вывести))
Pascal ABC Вычислить квадраты и кубы от 10 до 20 https://www.cyberforum.ru/ pascalabc/ thread656641.html
вычислить квадраты и кубы от 10 до 20.Вывести на экран в три вертикальные столбца
Master of Orion
Эксперт .NET
6098 / 4954 / 905
Регистрация: 10.07.2011
Сообщений: 14,522
Записей в блоге: 5
25.09.2012, 01:19 0

Даны действительные числа. Если A<=B<=C<=D, то каждое число заменить наибольшим из них - Pascal ABC - Ответ 3484668

25.09.2012, 01:19. Показов 20391. Ответов 3
Метки (Все метки)

Ответ

VSI, просто я на дельфи/паскале уже почти год не писал, а в шарпе, на котором я щас пишу, после методов точка с запятой противопоказана

Вернуться к обсуждению:
Даны действительные числа. Если A<=B<=C<=D, то каждое число заменить наибольшим из них Pascal ABC
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
25.09.2012, 01:19
Готовые ответы и решения:

Даны действительные числа a, b, c, d. Если a<=b<=c<=d, то каждое заменить наибольшим из них
Помогите срочно! Хотя бы представьте часть кода где: заменить наибольшим из них Даны...

Если a<=b<=c, то все числа заменить их квадратами, если a>b>c, то каждое число заменить наибольшим из них
Приветствую. Помогите пожалуйста решить задачку. Даны целые числа a,b и с. Если a&lt;=b&lt;=c, то все...

Если A<=B<=C<=D, то каждое число заменить наибольшим из них
Даны действительные числа A,B,C,D. Если A&lt;=B&lt;=C&lt;=D, то каждое число заменить наибольшим из них;...

Даны два целых числа, если числа не равны, то заменить каждое из них большим, а иначе заменить оба числа нулям
Даны два целых числа. Если числа не равны, то заменить каждое из них большим, а иначе заменить оба...

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

Даны целые k, l, m. Если числа не равны, то заменить каждое из них квадратами
Даны целые k, l, m. Если числа не равны, то заменить каждое из них квадратами, а если равны, то...

Даны целые числа m, n. Если числа не равны, то заменить каждое из них одним и тем же числом, равным большему из исходных
Даны целые числа m, n. Если числа не равны, то заменить каждое из них одним и тем же числом, равным...

Если числа отрицательны и не равны между собой, то каждое число замените наибольшим из них
Введите с клавиатуры три числа:A,B,C. ЕслиA&gt;B&gt;C&gt;0,то замените все числа их квадратами и выведите...

Даны действительные числа a, b, c. Удвоить эти числа, если a>b>c, и заменить их абсолютными значениями, если это не так
Спасаемпомогаем :) Задача: Даны действительные числа a, b, c. Удвоить эти числа, если a&gt;b&gt;c, и...

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