Vara:real;b:real;c:real;d1:real;d2:real;d3:real;
Beginwriteln ('Введите числа');readln (a);readln (b);readln (c);d1:= a+b+c;d2:= a*b*c;d3:= (a+b+c)/3;writeln ('Сумма =',d1,',произведение =',d2,', а среднее арифметическое =',d3,'')end.
Vara:real;b:real;c:real;d1:real;d2:real;d3:real;
Beginwriteln ('Введите числа');readln (a);readln (b);readln (c);d1:= a+b+c;d2:= a*b*c;d3:= (a+b+c)/3;writeln ('Сумма =',d1,',произведение =',d2,', а среднее арифметическое =',d3,'')end.