Есть ответ 👍

Описать процедуру mean (x, y, amean, gmean), вычисляющую среднее арифметическое amean = (x+y)/2 и среднее двух положительных чисел x и y (x и y — входные, amean и gmean — выходные параметры вещественного типа). с этой процедуры найти среднее арифметическое и среднее для пар (a, b), (a, c), (a, d), если даны a, b, c, d

281
477
Посмотреть ответы 2

Ответы на вопрос:


Procedure mean(x,y: real; var amean,gmean: real); begin amean: =(x+y)/2; gmean: =sqrt(x*y); end; var     a,b,c,d,s: real; begin write('a = '); readln(a); write('b = '); readln(b); write('c = '); readln(c); write('d = '); readln(d); writeln; mean(a,b,s,b); writeln('amean(a,b) = ',s); writeln('gmean(a,b) = ',b); writeln; mean(a,c,s,c); writeln('amean(a,c) = ',s); writeln('gmean(a,c) = ',c); writeln; mean(a,d,s,d); writeln('amean(a,d) = ',s); writeln('gmean(a,d) = ',d); end. a = 1 b = 2 c = 3 d = 4 amean(a,b) = 1.5 gmean(a,b) = 1.4142135623731 amean(a,c) = 2 gmean(a,c) = 1.73205080756888 amean(a,d) = 2.5 gmean(a,d) = 2

истина и ложь

Объяснение:

Тип данных представлен двумя значениями: true - истина и false - ложь. ... Свои значения переменные логического типа получают обычно в результате выполнения операции сравнения (отношения): »<» (меньше), »>» (больше), »<=» (меньше или равно), »>=» (больше или равно), »<>» (не равно), »=» (равно). ... В остальных случаях эти функции принимают значение false.

Популярно: Информатика