Очень прошу помощи.

Напишите программу нахождения среднего арифметического 3-х целых чисел, вводимых с клавиатуры.

1

Ответы и объяснения

2013-05-22T12:11:28+04:00

var a,b,c:integer;
s:real;
begin
writeln('Vvedite abc');
read(a,b,c);
s:=(a+b+c)/3;
writeln('Srednee arifmeticheskoe 3 chisel = ',s);
end.