Программирование на языке Паскаль;Напишите программку нахождения числа из трех, которое
Программирование на языке Паскаль;
Напишите программку нахождения числа из 3-х, которое находится в центре.
Спасибо
Недобоева
Мирослава
Нет условия (перепишите вполне условие)
Дарья Притыко
то что написано теснее и так понятно
Светлана Бернт
Среднее арифметическое что ли?
Анжелика Хандаева
размышляю в данном случае то, которое больше одного и меньше иного
Елена Ростеванова
вероятно
1 ответ
Петрук Карина
Var a,b,c,sr: real;
begin
write('задайте a,b,c '); readln(a,b,c);
sr:=a+b+c-max(a,max(b,c))-min(a,min(b,c));
if a=sr then writeln('среднее а = ',a)
else if b=sr then writeln('среднее b = ',b)
else writeln('среднее c = ',c);
end.
begin
write('задайте a,b,c '); readln(a,b,c);
sr:=a+b+c-max(a,max(b,c))-min(a,min(b,c));
if a=sr then writeln('среднее а = ',a)
else if b=sr then writeln('среднее b = ',b)
else writeln('среднее c = ',c);
end.
Марина Лесникова
Srzontmp, не во всякой версии Паскаля предопределена функция MAX и MIN - так что или распишите ее раздельно, или уточняйте версию Паскаля у творца вопроса.
Shurik Stropov
Признаться, мне не доводилось встречаться с трансляторами, в которых нет интегрированных функций max(a,b) и min(a,b), это наверное совсем какой-то бедный транслятор.
Витек Серебриян
TurboPascal может и бедный, но с него все начиналось. Но есть к примеру FreePascal - который убогим теснее не назовёшь - на данный момент умышленно в нём проверил - выдал ошибку на MAX
Инна Можанова
А библиотека Math подключена? Это малый набор стандартных функций. Либо, может быть, тогда и для sin, cos, tg свои процедуры - функции писать?
Ксения Бременкова
sin и cos как раз интегрированные... а если уж нужно подключать библиотеку, то вновь же - в коде этого не обозначено... потому и говорю - или расписываешь функции сам (они малюсенькие) , или уточнять версию требуемого компилятора.
Норманских
Вадим
Вопрос все одинаково будет удален, отмечен как нарушение, поэтому, чего копья ломать?
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
Рассматривая литературный язык как сложное взаимодействие книжного языка и разговорного,В.И.Чернышёв горячо
Разные вопросы.
Арабы входят в __________________ групп народов. Местом расселения арабов с незапамятных
Разные вопросы.
Грузовой автомобиль марки краз за одну поездку может доставить 7.500 кирпичей
Математика.
Определить предложения какие они по цели высказывания и по интонации
Русский язык.
"Три толстяка" Называли эту площадь Площадью Звезды последующей причине.
Русский язык.
на одной грядке коротышки посадили 3 ряда морковок по 8 штук
Разные вопросы.
эссе на тему какое образование дается в каждой семье
Қазақ тiлi.
Put the verb in brackets into the Present Indefinite.
1The Volga ,
Английский язык.
Сколько стоит коктейль молочный? Точную цену надо?
Математика.
Составить рассказ Из чего складывался культ монарха помазанника Божьего?
История.
Облако тегов