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

Question

Информатика

Фаиня

1 июня, 21:35

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

+2

Ответы (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.