ИНФОРМАТИКЕ Написать программу Найти среднее арифметическое - вопрос №15346429 от ivanBashak1 15.04.2023 06:51

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.

ivanBashak1 · 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....