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.
НУЖНО СДЕЛАТЬ БЛОК СХЕМУ
nastikots:
Подробную или общую? Ввод в 1 блоке или в 3?
Подробную и ввод в 3 блока
А задача что делать должна? У тебя знаки в условии не расставлены.
Хз просто это это алгоритму нужно сделать блок схему
Так в условие в схеме что писать?
if (a b) and (b b) and (b > c) then
if (a < b) and (b < c) then
min:=a;
if (a > b) and (b < c ) then
min:=b;
if (a > b) and (b > c) then
min:=a;
if (a > b) and (b < c ) then
min:=b;
if (a > b) and (b > c) then
Ответы на вопрос
Ответил nastikots
1
Ответ:
Картинка
Объяснение:
Качество не очень, но увеличивается терпимо
Подробная и с дописанным условием из комментариев
Где ввод, где вывод обозначено
Приложения:
Новые вопросы