ИНФОРМАТИКЕ Написать программу Найти среднее арифметическое - вопрос №15346597 от ворона1111 03.10.2022 10:56

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.

ворона1111 · 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....