Задачник Абрамова № 5

• Алексей
• Комментариев нет

§ 1. Арифметика действительных чисел. Вычисление по формулам.

5. Даны два действительных числа. Найти среднее арифметическое этих чисел и среднее геометрическое их модулей.

C:

#include <stdio.h>;
#include <math.h>;

int main()
{
	float a,b;
	printf("a = ");
	scanf("%f",&a);
	printf("b = ");
	scanf("%f",&b);
	printf("Srednee arifmeticheskoe: %fnSrednee geometricheskoe: %fn",(fabs(a)+fabs(b))/2,sqrt(fabs(a)*fabs(b)));
	return 0;
}

Pascal:

var a,b:real;
begin
	write('a = ');
	read(a);
	write('b = ');
	read(b);
	write('Srednee arifmeticheskoe: ',(abs(a)+abs(b))/2:4:2,#13#10'Srednee geometricheskoe: ',sqrt(abs(a)*abs(b)):4:2,#13#10);
end.