Помогите пожалуйста! Срочно надо написать программу в паскале. Задание: Введите три трёхзначных числа. Найти разность между наибольшим м наименьшим.
5-9 класс
|
Заранее спасибо!
begin
var a, b, c: single;
readln(a, b, c);
writeln(max(a, max(b, c)) - min(a, min(b, c)));
end.
Позязя, расширеннее...
begin
var a, b, c, d, e: single;
readln(a, b, c);
if (a < b) then
d := a
else
d := b;
if (c < d) then
d := c;
if (a > b) then
e := a
else
e := b;
if (c > e) then
e := c;
writeln(e - d);
end.
Другие вопросы из категории
о.сколько весит каждая кошка и каждый котенок в отдельности?
чисел. Количество суммируемых
чисел должно вводиться во время работы программы. Программа должна
проверять правильность введенных пользователем данных и, если они неверные ( n ≤ 0 ), выдавать сообщение об ошибке.
Буду очень признательна, если кто-нибудь возьмется за это задание. Спасибо)
Поликарп и двоечник Колька составляли максимальное 5-значное число,
которое состоит из различных нечётных цифр. Поликарп своё число составил
правильно, а Колька ошибся — он не заметил в условии
слово "различных", и очень радовался, что его число оказалось
больше, чем число Поликарпа. Какие числа составили Поликарп и Колька?
Читайте также
Написать программу,которая вычисляет площадь прямоугольного треугольника. Параметрами функции должны быть значения катетов.
утро","Добрый день","Добрый вечер", "Спокойной ночи". 2)Написать программу,которая определяет,принадлежит ли точка с координатами (x,y)Заштрихованной области,ограниченной точками(x1,y1)(x2,y2).
Составить программу для паскаля.
1) y=x^8
2) y=x^10
С кондитерской фабрики отгружают конфеты в коробках по 10 кг, 5 кг и 1 кг. Какое наименьшее количество коробок потребуется для перевозки N килограмм конфет?
программу которая вставит между буквами веденного слова пробелы 3)написать программу вывода на экран деление двух чисел