Можно реализовать через строки, но вы видимо только начали проходить Паскаль, поэтому такой вариант ;-)
I) компьютерная
II) Локальной сети
III) Топология Звезда:
1)Выход из строя одной рабочей станции не отражается на работе всей сети целом.
2) Лёгкий поиск неисправностей и обрывов в сети.
3) Высокая производительность сети.
4)Гибкие возможности администрирования.
В 12-ричной системе счисления.
77 = 7 * 8 + 7 = 63.
53 = 12 * 5 + 3 = 63.
Var r1,r2,ds:real;
begin
write('R1 = '); readln(r1);
write('R2 = '); readln(r2);
ds:=pi*abs(r1*r1-r2*r2);
writeln('ds = ',ds);
end.
Пример:
R1 = 6
R2 = 4
ds = 62.8318530717959