10+7=17
роде правильно !!!!!!!!
Ответ:
program Qwerty;
var a, b, c, d, e, f, g: real;
begin
readln (a, b, c, d, e);
f:=5;
g:=(a+b+c+d+e)/f;
writeln (g);
end.
Объяснение:
1. Узнать какие сегодня уроки
2. Достать нужные принадлежности и пенал
3. Достать портфель
4. Открыть портфель
5.Положит эти принадлежности в портфель
6. Закрыть портфель
7. Все перепроверить и убедится, что взято
Program idinah;
var a, b: real;
begin
write('a, b = ');
readln(a,b);
writeln('Среднее арифметическое = ',(a+b)/2);
end.