в Free Pascal'e. нужно записать программу. "Ввести три целых числа с клавиатуры. Найти их произведение, сумму и среднее арифметическое." p.s простите за столько тем, первый раз сдесь..
var a,b,c:integer; begin read(a,b,c); writeln(a*b*c); writeln(a+b+c); writeln((a+b+c)/3); end.