Написати алгоритм алгоритмічною мовою визначення середнього арифметичного трьох чисел

daut2001 daut2001    3   22.01.2021 23:46    1

Ответы
мTTTTTTся мTTTTTTся  21.02.2021 23:48

Procedure...

var a, b, c, s: real;

begin

a:= strtofloat(edit1.text);

b:= strtofloat(edit2.text);

c:= strtofloat(edit3.text);

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

edit4.text:= floattostr(s);

end;

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика