Решение задачи Begin8

Листинг задания Begin8
1
2
3
4
5
6
7
8
9
10
11
uses
  PT4;
 
var
  a, b: real;
 
begin
  Task('Begin8');
  read(a, b);
  write((a + b) / 2);
end.
Поделиться: