Составить программу и блок схему к задаче: даны 2 числа. Найти минимальное из них.

Question

Информатика

Алгурь

28 августа, 05:31

Составить программу и блок схему к задаче: даны 2 числа. Найти минимальное из них.

+3

Ответы (1)

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

Феофантий · Answer 1

Program n_5;

var

a, b: integer;

begin

writeln ('Введите 2 целых числа ') ;

readln (a) ;

read (b) ;

if a > b then

write (b, ' < ', a) ;

if a < b then

write (a, ' < ', b) ;

if a = b then

write (a, ' = ', b) ;

end.