Даны три числа a,b,c. Вычислите, на сколько самое большое из них больше самого маленького ( в Паскале)
Ответы
Ответ дал:
1
Ответ:
Код рабочий, проверял
Program Min-Max;
var a,b,c,min,max:integer; # задаём переменные
begin
write('Введите 3 числа для сравнения (через пробел) : ');read(a,b,c); # ввод данных
min:=a;max:=a;
if b>max then max:=b;if b<min then min:=b; # сравниваем числа
if c>max then max:=c;if c<min then min:=c;
write(max - min); # выводим результат
end.
Если ответ помог, отметьте его как лучший.
Вас заинтересует
1 год назад
1 год назад
2 года назад
2 года назад
7 лет назад
8 лет назад