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

Question

Информатика

Паля

22 сентября, 22:05

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

+1

Ответы (2)

Знаете ответ на вопрос?

Ярополк · Answer 1

По моему так:

program p;

var

a, b, c:integer;

begin

writeln ('первое число:') ;

readln (a) ;

writeln ('второе число:') ;

readln (b) ;

writeln ('третие число:') ;

readln (c) ;

if (a>b) and (a>c) then

writeln ('Первое число является наибольшим') ;

if (a>b) and (a
writeln ('Первое число является средним') ;

if (a
writeln ('Первое число является наимешим') ;

if (b>a) and (b>c) then

writeln ('Второе число является наибольшим') ;

if (b>a) and (b
writeln ('Второе число является средним') ;

if (b
writeln ('Второе число является наимешим') ;

if (c>b) and (c>a) then

writeln ('Третие число является наибольшим') ;

if (c>b) and (c
writeln ('Третие число является средним') ;

if (c
writeln ('Третие число является наимешим') ;

end.

Ленуся · Answer 2

Решение:

Даны три различных целых числа: a=17, b = 10, c=6.

Наибольшее a>b

a>c

Наименьшее c
c
Среднее b
b>c

Тебе код нужен?