Найти среднее арифметическое и среднее геометрическое двух чисел (Блок-схема)

@ваня1993 · Регистрация: 24.12.2011

Даны 2 числа.Найти их среднее арифметическое и среднее геометрическое

@morgan57 · 08.01.2012, 20:14

код:

Pascal

var
a,b:integer;
c,x:real;
begin
  readln(a,b);
  c:=(a*b)/2;
  x:=(a+b)/2;
  writeln(c:4:4,' ',x:4:4);
end.

и блок схема на ворде

@ваня1993 0 / 0 / 0 Регистрация: 24.12.2011 Сообщений: 9
		1
	Найти среднее арифметическое и среднее геометрическое двух чисел (Блок-схема) 08.01.2012, 15:33. Показов 9636. Ответов 1 Метки нет (Все метки) Даны 2 числа.Найти их среднее арифметическое и среднее геометрическое 0

Опции темы

Решение