Uses crt;
var
a,b,c: real;
begin
clrscr;
write (a=);
readln (a);
write (b=);
readln (b);
write (c=);
readln (c);
writeln (a+b+c=,a+b+c);
writeln (a*b*c=,a*b*c);
writeln ((a+b+c)/3=,(a+b+c)/3);
readln ();
end.
Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.