Question

program zadacha_8;
uses crt;
var
min,a,b,c:integer;
begin
clrscr;
writeln('введите число №1 ');
readln(a);
writeln('введите число №2 ');
readln(b);
writeln('введите число №3 ');
readln(c);
if (a b) and (b b) and (b > c) then
min:=c;
writeln('min=',min);
readln;
min:=a*b*c; {присваиваю min произведение трех чисел}
writeln('min=',min);
readln;
end.

НУЖНО СДЕЛАТЬ БЛОК СХЕМУ

Answer 1

Ответ:

Картинка

Объяснение:

Качество не очень, но увеличивается терпимо

Подробная и с дописанным условием из комментариев

Где ввод, где вывод обозначено