Напишите построчную запись алгоритма нахождения среднего арифметического из трёх введенных на клавиатуре чисел и вывода на экран результата в том случае, если оно будет положительным ( напишите на языке паскаль)
Напишите построчную запись алгоритма нахождения среднего арифметического из трёх введенных на клавиатуре чисел и вывода на экран результата в том случае, если оно будет положительным ( напишите на языке паскаль)
Гость
Ответ(ы) на вопрос:
Гость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.
Не нашли ответ?
Похожие вопросы