Дано 2 неравных числа. Вывести на экран порядковый номер наименьшего числа (если меньшее число вводится первым, то вывести "1", в противоположном случае "2")

Question

Информатика

Мелис

30 ноября, 01:11

Дано 2 неравных числа. Вывести на экран порядковый номер наименьшего числа (если меньшее число вводится первым, то вывести "1", в противоположном случае "2")

+4

Ответы (1)

Знаете ответ?

Апанасия · Answer 1

var a, b:real;

begin

writeln ('Введите первое число') ;

readln (a) ;

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

readln (b) ;

if a
writeln (1) else

writeln (2)

end.