Составить блок схему и написать программку на турбо Паскале . Вычеслить
Составить блок схему и написать программу на турбо Паскале . Вычеслить s=1/2[max(a,b,c)+min(a,b,c)]
1) a=8; b=3; c=-2;
2)a=1; b=4; c=16;
Задать свой вопрос1 ответ
Костя Банеев
1)
var s,a,b,c:real;
begin
a:=8; b:=3; c:=-2;
s:= 1/2[max(a,b,c)+min(a,b,c)];
end.
2)
var s,a,b,c:real;
begin
a:=1; b:=4; c:=16;
s:= 1/2[max(a,b,c)+min(a,b,c)];
end.
var s,a,b,c:real;
begin
a:=8; b:=3; c:=-2;
s:= 1/2[max(a,b,c)+min(a,b,c)];
end.
2)
var s,a,b,c:real;
begin
a:=1; b:=4; c:=16;
s:= 1/2[max(a,b,c)+min(a,b,c)];
end.
Вячеслав Шевердяев
uses crt;var a,b,c,max,min:integer; s:real;Begin clrscr; Write('a='); readln(a); Write('b='); readln(b); Write('c='); readln(c); max:=a; If max>b then max:=b; if max>c then max:=c; min:=a; if min
Нелли
окончательно благовидней было бы через функцию сделать, но сори, давно не писал в паскале ничего!
Коля
кстати если вы вообще не в теме! переменный a,b,c сдесь вводится с клавиатуры, так что сможете задать любые значения чтоб проверить корректность решения(очевидно в границах возможных типов)!!
Алёна Кекелева
Один хрен числа заданы)
Паровик
Галина
s:= 1/2[max(a,b,c)+min(a,b,c)]; но эту строку ты не правильно написал! вроде бы нету стандартной функции в паскале max и min! их необходимо самому прописывать! или через ветвление, как сделать, как я!
Ева Куторгина
s:= 1/2[max(a,b,c)+min(a,b,c)]; их сам определяешь , но нужно наличие ветвления
Злата Цирикова
Нас учили что есть, но записал её, да, ошибочно. Забывать теснее начал) Max(a,b,c: integer): integer; И Min(a,b,c: integer): integer;
Леха
1/2[max(a,b,c)+min(a,b,c)] задание поставлено именно так
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
Игорь 14 лет назад был на 8 лет моложе, чем его
Математика.
Два тела массами m1 и m2 находящие на расстоянии R друг
Физика.
В сосуде 4целых одна пятая литр воды что бы заполнить сосуд
Математика.
Двум малярам Диме И Олегу поручили выкрасить фасад дома они разделили
Разные вопросы.
найти порядковый номер 41Э если в ядре 20 нейтронов
Разные вопросы.
в ряду натуральных чисел 3, 8, 10, 24, … 18 одно
Математика.
Предприятие по производству с/хоз продукции на производство затратило 3527000 руб Валовый
Разные вопросы.
Математика, задано на каникулы. ВАРИАНТ 1004
НОМЕР 1,2,3,4,5,6,7,8.
Математика.
Имеются три конденсатора емкостью С1=1мкФ, С2=2мкФ и С3=3мкФ. Какую наименьшую емкость
Физика.
Из точки м выходят 3 луча MP MN и MK причём
Геометрия.
Облако тегов