ИНФОРМАТИКЕ Написать программу Найти среднее - вопрос №15346254 от Benito84 17.03.2020 03:58

Question

Информатика: ИНФОРМАТИКЕ Написать программу Найти среднее арифметическое трёх чисел введенных с клавиатуры XX= a+b+c/3 Program sr_arifm Var a,b,c,x:real Begin Writeln( Введите три числа ) Readln(a,b,c) x:=??? Writeln( Среднее арифметическое= , x) end.

Benito84 · Answer

Тупо дописываем в 6 строку (a+b+c)/3Program sr_arifm Var a,b,c,x:real begin Writeln( Введите три числа ) ;Readln(a,b,c) ;x:=(a+b+c)/3;Writeln( Среднее арифметическое= , x) ;end....