Помогите пожалуйста.Необходимо собрать программку

Начало программки в паскале это название: Program sredarifm;

Следом блок описания переменных. Здесь 2 аспекта. 1. числа у нас Целые, а как следует нужно integer. 2. нам требуются как входные так и выходные переменные, а означает их будет: 3 входных(вводимые числа) + 1 выходное (среднее арифметическое) : var a,b,c:integer;

var d:real; (Среднее арифметическое может оказаться не целым числом)

следом начинается программка, так что : begin

Сейчас считываем вводимые числа с поддержкою команды read/readln : Readln (a,b,c);

Проводим операции над переменной d:

d:= a+b+c;

d:=d/3;    порядок разъясняется особенностью среднего арифметического (сумма всех членов деленная на 3)

Дальше нужно вывод переменной d благодаря write/writeln: Writeln('sa = ', d);

и закрываем программку командой : end.

Общий вид программки:

Program sredarifm;

var a,b,c:integer;

var d:real;

begin

Readln (a,b,c);

d:= a+b+c;

d:=d/3;

Writeln('sa = ', d);

end.