Написать программу и блок-схему. Дано три числа a, b, c. Найти среди них минимальное?

Question

Крид

Информатика

15 апреля, 02:06

Написать программу и блок-схему. Дано три числа a, b, c. Найти среди них минимальное?

+4

Ответы (1)

Знаешь ответ на этот вопрос?

Любовь Кондратова · Answer 1

program al; var a, b, c, d, e1, e2: integer; begin writeln ('введите три числа'); readln (a, b, c); d:=a-b; if d>0 then e1:=b-c; if d0 then writeln (c); if e10 then writeln (c); if e2<0 then writeln (a); end.