1.
Program zavdannia;
var x,y: real;
begin
read(x);
y:=(x+4)/(x-2);
write(y);
end.
2.
Program zavd2;
var x,y: real;
begin
y :=sqrt((x*x-4*x-4)/(x-8);
write(y);
end.
World Wibe Web - Всемирная паутина
var r:real;
begin
write ('Введите радиус окружности: ');
read(r);
writeln ('Диаметр равен: ', r*2:0:3);
writeln ('Длина окружности равна: ', 2*pi*r:0:3);
end.
Винчестер - сленговое название устройства для записи и считывания на жёстких дисках