Даны x y x если числа положительные то . вычислить их среднее арифметическое ОЧЕНЬ НАДО !!!!!!!!!!

а сможешь разделить без объяснений , по строчкам , столбиком !

напиши пожалуйста без объяснений !!!

var x,y,z, sum: real;beginsum:=0;read(x, y, z); if x>=0 then if y>=0 then if z>=0 then sum:=(x+y+z)/3; writeln('Среднее арефметическое: ',sum); end.

спасибо !!!!!!

Не за что!

Я так понял тебе нужно на паскале, тогда держи: program dataScience;var  x,y,z, sum: integer;beginsum:=0;read(x, y, z);  if x=>0 then//проверка на положительность x    if y=>0 then//проверка на положительность y      if z=>0 then//проверка на положительность z        sum:=(x+y+z)/3;//счёт среднего          writeln(sum);//вывод среднего арефметического end.