Задача по информатике
даны два действительных положительных числа . найти среднее арифметическое и среднее геометрическое этих чисел.
паскаль
Program mat;
var a,b: integer;
c,d:real;
begin
readln(a,b);
c:=(a+b)/2;
d:=(a*b)/2;
writeln(среднее арифметическое = ,c, среднее геометрическое = , d);
end.
________________
a и b - это те числа которые нужно ввести(два действительные натуральные положительные)
с - среднее арифметическое.
d- среднее геометрическое.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
