Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/5: Рейтинг темы: голосов - 5, средняя оценка - 5.00
Ibragimov123
1

Найти максимум и минимум НЕ используя оператор IF

03.12.2012, 20:54. Показов 990. Ответов 2
Метки нет (Все метки)

Нужно ввести 2 вещественных числа и определить, какое из них максимальное, а какое минимальное, не используя оператор IF/ Не догоняю как сделать, а лабораторную нужно сдавать завтра.
__________________
Помощь в написании контрольных, курсовых и дипломных работ здесь
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
03.12.2012, 20:54
Ответы с готовыми решениями:

Найти минимум и максимум.
Из 6 заданных чисел найти максимум минимум. Вывести на печать эти числа с указанием четное оно или...

Найти минимум и максимум
Здравствуйте. Помоги пожалуйста есть программа которая открывает картинку в bmp формате и...

Найти минимум и максимум списка
Найти номер первого1|последнего2 экстремального (то есть минимального или максимального) из данных...

Найти минимум и максимум в массиве
Помогите решить задачу.Подпрограмма-функция. Составить программу с использованием подпрограммы...

2
314 / 273 / 272
Регистрация: 25.09.2011
Сообщений: 477
03.12.2012, 21:13 2
Лучший ответ Сообщение было отмечено как решение

Решение

может так сойдет?

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
  var a,b : real;
  Begin
    write('input a,b: '); readln(a,b);
    while a>b do begin
      writeln('a>b');
      readln;
      exit;
    end;
    writeln('b>a');
    readln;
    exit;
  End.
Добавлено через 45 секунд
exit в 11 строке лишний))
0
34 / 34 / 19
Регистрация: 17.11.2012
Сообщений: 109
Записей в блоге: 2
03.12.2012, 21:18 3
b>a всенравно выведет поэтому его тоже через while нужно
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
03.12.2012, 21:18

Из 6 чисел найти минимум и максимум.
"Из 6 заданных чисел найти максимум и минимум. Вывести на печать эти числа с указанием четное оно...

Найти минимум и максимум функции
помогите решить 31. Найти минимум и максимум функции Y = X3 – 7X +8, х принимает целые значения на...

Найти минимум и максимум функции
help me pls 32. Найти минимум и максимум функции Y = ln(x – x2 +8), х принимает целые значения на...

Найти минимум и максимум в массиве
в произвольной матрице i;=1 to M do,j:=1 to N do.найти мин. и макс. элементы,указать номера строк и...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.