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

Question

Информатика

Мелис

24 марта, 04:09

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

+3

Ответы (1)

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

Апанасия · Answer 1

var a, b:real;

begin

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

readln (a) ;

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

readln (b) ;

if a
writeln (1) else

writeln (2)

end.