С Новым годом! Форум программистов, компьютерный форум, киберфорум
PascalABC.NET
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
PascalABC.NET Если слово имеет четную длину, удалить в нем вторую букву https://www.cyberforum.ru/ pascalabc-net/ thread1221805.html
Сформировать по строке а новую строку по правилу:если слово имеет четную длину,удалить в нем вторую букву.
PascalABC.NET Как сохранить изображение с формы?
вообщем с помощью события paint или с помощью дескриптора формы нарисовал на ней к примеру треугольник и как мне теперь сохранить его в файл пробовал var bit:=new bitmap(f.clientsize.width,f.clientsize.height,g);bit.save(path) где g дескриптор графики формы.и пробовал var bit:=new bitmap(f.clientsize.width,f.clientsize.height); f.DrawToBitmap(Bit,f.Bounds);bit.save(path) тоже не работает ...
PascalABC.NET Найти среднее геометрическое элементов матрицы, принадлежащих интервалу Массив А(6х8). Найти среднее геометрическое элементов, принадлежащих интервалу , при условии, что такие элементы в нем присутствуют. Ввод элементов оформить процедурой. Не пойму, что не так??? Программа выдает ответ через раз. Почти постоянно пишет, что равно 0. const n=6; m=8; type matr=array of integer; var a:matr; i,j,sr,kol:integer; srg:real; procedure vvod( var a:matr;... https://www.cyberforum.ru/ pascalabc-net/ thread1221630.html PascalABC.NET Упорядочить массив по алфавиту и распечатать в виде четырех столбцов https://www.cyberforum.ru/ pascalabc-net/ thread1221597.html
Массив А содержит слова, состоящие из 5 символов . Упорядочить его по алфавиту и распечатать в виде 4-х столбцов. Слова, начинающиеся с гласной буквы , пометить " * " и подсчитать. Очень нужна ваша помощь по составлению программы)
Имеются два текстовых файла с одинаковым числом строк; выяснить, совпадают ли их строки PascalABC.NET
Имеются два текстовых файла с одинаковым числом строк . Выяснить , совпадают ли их строки. Если нет , то получить номер первой строки , в которой эти файлы отличаются друг от друга. Очень нужна ваша помощь!
PascalABC.NET Имеет ли смысл данное выражение? stroka:=' '*kvo+' ' Если не будет работать, то почему и как заменить? p.s.: stroka: string; kvo: integer https://www.cyberforum.ru/ pascalabc-net/ thread1221532.html
PascalABC.NET Программа выбрасывает исключение, если в самом начале не написать readkey Программа вылетает с необработанным исключением. Ставлю в самом начале readkey и все работает! И было так не с одной корректной программой. Что за фигня? https://www.cyberforum.ru/ pascalabc-net/ thread1221528.html В исходной строке а определить количество слов, содержащих ровно п символов строки x PascalABC.NET
В исходной строке а определить количество слов,содержащих ровно п символов строки x.
PascalABC.NET Прочитать квадратную матрицу из текстового файла и переписать в новый файл https://www.cyberforum.ru/ pascalabc-net/ thread1221283.html
Пожалуйста, сделайте такую программу. Прочитать квадратную матрицу (n x n) из текстового файла и переписать в новый файл. Туда же дописать транспонированную, две главные диагонали и все ломаные. Должно получиться 4*n строк. Pascal ABC.Net.
PascalABC.NET Посоветуйте книги по PascalABC.NET https://www.cyberforum.ru/ pascalabc-net/ thread1220753.html
Какие книги посоветуете что бы улучшить свои знания в Паскале.ABC.NET? Выучил : циклы for,while,repeat массивы одномерный и двумерный строки Хочется чего то большего. Но что бы было написано понятным языком , большинство книг читать страшно ничего не понимаешь.
Составить массив записи о пирожных PascalABC.NET
Составить массив записи. 1) Название пирожного; 2) Кол-во муки затрачиваемого на про-во 1-го пирожного; 3) Кол-во сахара; 4) Кол-во яиц; 5) Общие затраты. По 2, 3, 4-полям выдавать 5-е.
PascalABC.NET Замена заглавных букв строчными на паскале https://www.cyberforum.ru/ pascalabc-net/ thread1220303.html
Разработать программу перекодировки текстового файла, заменив в нем все заглавные буквы строчными.
Фрилансер
73 / 73 / 51
Регистрация: 25.10.2011
Сообщений: 317
03.07.2014, 17:06 0

Из двух целых чисел вывести вначале максимальное, а затем минимальное - PascalABC.NET - Ответ 6392844

03.07.2014, 17:06. Показов 2799. Ответов 1
Метки (Все метки)

Лучший ответ Сообщение было отмечено Redsnake как решение

Решение

Pascal
1
2
3
4
5
6
7
var
x1, x2: Integer;
 
begin
readln(x1,x2);
if x1>x2 then write(x1,' ',x2) else write(x2,' ',x1);
end.


Вернуться к обсуждению:
Из двух целых чисел вывести вначале максимальное, а затем минимальное PascalABC.NET
1
Заказать работу у эксперта
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
03.07.2014, 17:06
Готовые ответы и решения:

Вывести вначале максимальное, а затем минимальное из введённых чисел
Помогите пж,из егэ: на вход подаются два целых числа; числа расположены в одной строке. Вывести...

Вывести вначале большее, а затем меньшее из двух чисел
Даны два числа. Вывести вначале большее, а затем меньшее из них Assembler

Найти номера двух соседних чисел из данного набора, произведение которых является минимальным, и вывести вначале меньший, а затем больший номер.
1) Дано целое число N (>1) и набор из N чисел. Найти номера двух соседних чисел из данного набора,...

Написать функцию, которая возвращает минимальное и максимальное из двух целых чисел, полученных в качестве аргумента
Написать функцию, которая возвращает минимальное и максимальное из двух целых чисел, полученных в...

1
03.07.2014, 17:06
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
03.07.2014, 17:06
Помогаю со студенческими работами здесь

Вывести вначале наименьшее, а затем наибольшее из данных чисел
Задача:Ввести три числа A, B, C. Вывести вначале наименьшее, а затем наибольшее из данных чисел....

Даны три числа. Вывести вначале наименьшее, а затем наибольшее из данных чисел
Даны три числа. Вывести вначале наименьшее, а затем наибольшее из данных чисел

Даны три числа. Вывести вначале наименьшее, а затем наибольшее из данных чисел(If)
Даны три числа. Вывести вначале наименьшее, а затем наибольшее из данных чисел(If)

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

0
Новые блоги и статьи
Что такое CQRS и как это реализовать на C# с MediatR
InfoMaster 15.01.2025
Концепция CQRS и её роль в современной разработке В современном мире разработки программного обеспечения архитектурные паттерны играют ключевую роль в создании масштабируемых и поддерживаемых. . .
Как настроить CI/CD с Azure DevOps
InfoMaster 15.01.2025
CI/ CD, или непрерывная интеграция и непрерывное развертывание, представляет собой современный подход к разработке программного обеспечения, который позволяет автоматизировать и оптимизировать процесс. . .
Как настроить CI/CD с помощью Jenkins
InfoMaster 15.01.2025
Введение в CI/ CD и Jenkins В современной разработке программного обеспечения непрерывная интеграция (CI) и непрерывная доставка (CD) стали неотъемлемыми элементами процесса создания качественных. . .
Как написать микросервис на Go/Golang с Kafka и GitHub CI/CD
InfoMaster 14.01.2025
Определение микросервиса, преимущества использования Go/ Golang Микросервис – это архитектурный подход к разработке программного обеспечения, при котором приложение состоит из небольших, независимо. . .
Как написать микросервис с нуля на C# с RabbitMQ, CQRS и CI/CD
InfoMaster 14.01.2025
В современном мире разработки программного обеспечения микросервисная архитектура стала стандартом де-факто для создания масштабируемых и гибких приложений. Этот архитектурный подход предполагает. . .
Как создать интернет-магазин на PHP и JavaScript
InfoMaster 14.01.2025
В современном мире электронная коммерция стала неотъемлемой частью бизнеса. Создание собственного интернет-магазина открывает широкие возможности для предпринимателей, позволяя достичь большей. . .
Как написать Тетрис на Ассемблере
InfoMaster 14.01.2025
Тетрис – одна из самых узнаваемых и популярных компьютерных игр, созданная в 1984 году советским программистом Алексеем Пажитновым. За прошедшие десятилетия она завоевала симпатии миллионы людей по. . .
Как создать игру "Танчики" на Unity3d и C#
InfoMaster 14.01.2025
Разработка игр – это увлекательный процесс, сочетающий в себе творчество и технические навыки. В этой статье мы рассмотрим создание классической игры "Танчики" с использованием Unity3D и языка. . .
Организую платный онлайн микро-курс по доработке Android-клиента Telegram
_Ivana 14.01.2025
Официальная версия и распространенные форки не полностью устраивают? Сделай свою кастомную версию клиента! 4 занятия по 2 часа (2 недели пн, ср 19:00-21:00 по Москве). Первое вводное занятие. . .
Как создать приложение для фитнеса для iOS/iPhone на Kotlin
InfoMaster 14.01.2025
Создание собственного фитнес-приложения — это не только захватывающий, но и полезный процесс, ведь оно может стать вашим верным помощником на пути к здоровому и активному образу жизни. В современных. . .
Как создать приложение магазина для iOS/iPhone на Swift
InfoMaster 14.01.2025
Введение в разработку iOS-приложений Разработка приложений для iPhone и других устройств на базе iOS открывает огромные возможности для создания инновационных мобильных решений. В данной статье мы. . .
Это работает. Скорость асинхронной логики велика. Вопрос видимо останется в стабильности. Плата - огонь!
Hrethgir 13.01.2025
По прошлому проекту в Logisim Evolution https:/ / www. cyberforum. ru/ blogs/ 223907/ blog8781. html прилагаю файл архива проекта в Gowin Eda. Восьмибитный счётчик из сумматора+ генератор сигнала. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru