2 / 2 / 0
Регистрация: 15.10.2013
Сообщений: 87
1

Описать процедуру, записывающую в переменную A минимальное из значений A и B

15.10.2013, 14:23. Показов 1257. Ответов 1
Метки нет (Все метки)

А) Описать процедуру Minmax(A,B), записывающую в переменную A минимальное из значений A и B, а в переменную B - максимальное из этих значений.
__________________
Помощь в написании контрольных, курсовых и дипломных работ здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
15.10.2013, 14:23
Ответы с готовыми решениями:

Описать процедуру Minmax(A,B), записывающую в переменную A минимальное из значений A и B, а в переменную B — максимальное из этих значений
В заданиях данной подгруппы требуется реализовать процедуры или функции с числовыми параметрами...

Описать процедуру Minmax(A,B), записывающую в переменную A минимальное из значений A и B
Описать процедуру Minmax(A,B), записывающую в переменную A минимальное из значений A и B, а в...

Описать процедуру Minmax(A,B), записывающую в переменную A мин. из значений A и B, а в переменную B - макс.
Описать процедуру Minmax(A,B), записывающую в переменную A минимальное из значений A и B, а в...

Описать процедуру Minmax(x,y) записывающую в переменную Х минимальное из значений Х и Y, а в переменную Y – максимальное из этих значений.
Описать процедуру Minmax(x,y) записывающую в переменную Х минимальное из значений Х и Y, а в...

1
791 / 386 / 259
Регистрация: 09.12.2011
Сообщений: 759
Записей в блоге: 29
15.10.2013, 15:03 2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Задание А)
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
Uses crt;
Var a,b:integer;
Procedure Minmax(Var a,b:integer);{описание процедуры}
 Var c:integer;{описание локальной переменной}
  Begin
   If a>b then
    Begin
     c:=a; a:=b; b:=c;{проводим замену, если нужно}
    End;
  End;
Begin
ClrScr;
Write('a='); Readln(a);{ввод a}
Write('b='); Readln(b);{ввод b}
Minmax(a,b);{вызов процедуры}
Writeln('Result:');
{вывод результатов:}
Writeln('a=',a);
Writeln('b=',b);
Readln;
End.
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
15.10.2013, 15:03

Описать процедуру Minmax(X, Y), записывающую в X минимальное из значений X и Y, а в переменную Y — максимальное
Описать процедуру Minmax(X, Y), записывающую в переменную X минимальное из значений X и Y, а в...

Создать подпрограмму Minmax (A, B), записывающую в переменную A минимальное из значений A и B
Создать подпрограмму Minmax(A,B), записывающую в переменную A минимальное из значений A и B, а в...

Описать процедуру, записывающую слова списка как строки
type слово = array of char; список = аrrау of слово; Описать процедуру зап(l, t), записывающую...

Описать процедуру prim(f,n), записывающую в файл f все простые числа, не превосходящие n
Помогите пожалуйста! Type rad = file of 1..maxint; Описать процедуру prim(f,n), записывающую в...


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

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

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