Начало программы в паскале это название: 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.