народ, можете проверить задачу, мне просто качать прогу не очень, короче хотелось бы что бы на проге Geany
Вот задача: Даны 3 числа вывести наибольшее и наименьшее
var a,b,c,min,max:integer;
begin
writeln('Введите три числа:');
readln(a,b,c);
max:=a;
if b>max then max:=b;
if c>max then max:=c;
min:=a;
if b
if c
writeln('Минимальное: ',min);
writeln('Максимальное: ',max);
end.
Вот задача: Даны 3 числа вывести наибольшее и наименьшее
var a,b,c,min,max:integer;
begin
writeln('Введите три числа:');
readln(a,b,c);
max:=a;
if b>max then max:=b;
if c>max then max:=c;
min:=a;
if b
if c
writeln('Минимальное: ',min);
writeln('Максимальное: ',max);
end.
More Questions From This User See All
Answers & Comments
Ответ:
нет
Объяснение:
Зачем ты написал
if b
if c
это условия где ничего не проверяются оно ломает компилятор