Напишите построчную запись алгоритма нахождения среднего арифметического из трёх введенных на клавиатуре чисел и вывода на экран результата в том случае, если оно будет положительным (напишите на языке паскаль)

Question

Информатика

Феоктист

18 июля, 10:23

Напишите построчную запись алгоритма нахождения среднего арифметического из трёх введенных на клавиатуре чисел и вывода на экран результата в том случае, если оно будет положительным (напишите на языке паскаль)

+1

Ответы (1)

Знаете ответ?

Митя · Answer 1

Program Project;

uses crt;

var

a, b, c: real;

sa: real;

begin

clrscr;

Read (a, b, c) ;

Readln;

sa: = (a+b+c) / 3;

if sa>=0 then

Writeln (sa:0:5) ;

Readln;

end.