Написать программу которая из трех цифр составит наибольшее трёхзначное число

@Dogma · Регистрация: 28.06.2020

Author24 — интернет-сервис помощи студентам

Написать программу которая из трех введённых нами цифр составит наибольшее трёхзначное число

@Puporev · 29.11.2020, 10:25

Введите 3 цифры a,b,c

Pascal

c1:=max(a,b,c);
c3:=min(a,b,c);
c2:=a+b+c-c1-c3;
n:=100*c1+10*c2+c3;

@Dogma · 29.11.2020, 10:41 **[ТС]**

Puporev, сможешь подробно расписать?Puporev,

@Puporev · 29.11.2020, 10:42

Не умею писать в стиле .net.

@Dogma · 29.11.2020, 10:48 **[ТС]**

Puporev, с++, #, python, pascal
Хоть как-нибудь

@Puporev · 29.11.2020, 10:55

В Паскале АВС.net, но не по нетовси.

Pascal

var a,b,c,c1,c2,c3,n:integer;
begin
repeat
  writeln('Введите 3 цифры');
  readln(a,b,c);
until(a in [0..9])and(b in [0..9])and(c in [0..9]);
c1:=max(a,b,c);
c3:=min(a,b,c);
c2:=a+b+c-c1-c3;
n:=100*c1+10*c2+c3; 
write(n)
end.

@Dogma · 29.11.2020, 11:27 **[ТС]**

Puporev, нет перегруженной подпрограммы С таким количеством параметров мах
Не знаешь что сделать с этим? 7 строка

@Sun Serega · 29.11.2020, 11:32

Pascal

1
2
3

## ReadArrInteger(3)
.OrderDescending
.Println('');

@Dogma · 29.11.2020, 11:55 **[ТС]**

Sun Serega, не подскажешь куда это прописать, между каких строк?

@Sun Serega · 29.11.2020, 12:15

Не между каких, это вся программа. Вставляй в редактор как есть, ничего не убирая и не добавляя.

@Puporev · 29.11.2020, 12:19

Сообщение от Dogma

нет перегруженной подпрограммы

Есть

function Max(a,b,...: T): T;
Возвращает максиимальное из a,b,...

Это Вы что-то не то делаете.

@Sun Serega · 29.11.2020, 12:22

Я уже сказал в дубле:
Нет перегруженной подпрограммы с таким количеством параметров
Ему явно обновится надо...

@Dogma 0 / 0 / 0 Регистрация: 28.06.2020 Сообщений: 8
		1
	Написать программу которая из трех цифр составит наибольшее трёхзначное число 29.11.2020, 10:07. Показов 2892. Ответов 11 Метки нет (Все метки) Написать программу которая из трех введённых нами цифр составит наибольшее трёхзначное число 0

@Dogma 0 / 0 / 0 Регистрация: 28.06.2020 Сообщений: 8
	29.11.2020, 10:41 [ТС]	3
	Puporev, сможешь подробно расписать?Puporev, 0

@Puporev Почетный модератор 64300 / 47595 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	29.11.2020, 10:42	4
	Не умею писать в стиле .net. 0

@Dogma 0 / 0 / 0 Регистрация: 28.06.2020 Сообщений: 8
	29.11.2020, 10:48 [ТС]	5
	Puporev, с++, #, python, pascal Хоть как-нибудь 0

@Dogma 0 / 0 / 0 Регистрация: 28.06.2020 Сообщений: 8
	29.11.2020, 11:27 [ТС]	7
	Puporev, нет перегруженной подпрограммы С таким количеством параметров мах Не знаешь что сделать с этим? 7 строка 0

@Dogma 0 / 0 / 0 Регистрация: 28.06.2020 Сообщений: 8
	29.11.2020, 11:55 [ТС]	9
	Sun Serega, не подскажешь куда это прописать, между каких строк? 0

@Sun Serega 2308 / 1419 / 516 Регистрация: 07.04.2017 Сообщений: 4,721
	29.11.2020, 12:15	10
	Не между каких, это вся программа. Вставляй в редактор как есть, ничего не убирая и не добавляя. 0

@Puporev Почетный модератор 64300 / 47595 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	29.11.2020, 12:19	11
	Сообщение от Dogma нет перегруженной подпрограммы Есть function Max(a,b,...: T): T; Возвращает максиимальное из a,b,... Это Вы что-то не то делаете. 0

@Sun Serega 2308 / 1419 / 516 Регистрация: 07.04.2017 Сообщений: 4,721
	29.11.2020, 12:22	12
	Я уже сказал в дубле: Нет перегруженной подпрограммы с таким количеством параметров Ему явно обновится надо... 0

Написать программу которая из трех цифр составит наибольшее трёхзначное число

Решение