напечатать произведение двух наибольших из трёх из заданых чисел, используя при этом не более двух сравнений

@NightStalkeP · Регистрация: 25.12.2009

@кот Бегемот · 26.12.2009, 00:13

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

напечатать произведение двух наибольших из трёх из заданых чисел, используя при этом не более двух сравнений

Pascal

var
a,b,c,min:integer;
begin
readln(a,b,c);
if a<b then min:=a else min:=b;
if c<min then min:=c;
writeln(a*b*c div min);
end.

@NightStalkeP 0 / 0 / 0 Регистрация: 25.12.2009 Сообщений: 14
		1
	напечатать произведение двух наибольших из трёх из заданых чисел, используя при этом не более двух сравнений 25.12.2009, 23:34. Показов 1770. Ответов 1 Метки нет (Все метки) напечатать произведение двух наибольших из трёх из заданых чисел, используя при этом не более двух сравнений 0

	26.12.2009, 00:13

Решение