about summary refs log tree commit diff
path: root/9/TP-Huế-2014/bai2.pas
diff options
context:
space:
mode:
authorRaphael McSinyx <vn.mcsinyx@gmail.com>2016-11-06 11:13:14 +0700
committerRaphael McSinyx <vn.mcsinyx@gmail.com>2016-11-06 11:13:14 +0700
commit7de121c4b4ef888a0d1990c27144a7f9dd8c5f94 (patch)
tree2a298c9a957ad490cf8251ab264413f4effa9dce /9/TP-Huế-2014/bai2.pas
parente4767bb46d1d759f9c863704e3f347d2a0c8c49a (diff)
downloadcp-7de121c4b4ef888a0d1990c27144a7f9dd8c5f94.tar.gz
Thêm đề HSG 12 huyện Vĩnh Tường, Vĩnh Phúc
Diffstat (limited to '9/TP-Huế-2014/bai2.pas')
-rw-r--r--9/TP-Huế-2014/bai2.pas35
1 files changed, 0 insertions, 35 deletions
diff --git a/9/TP-Huế-2014/bai2.pas b/9/TP-Huế-2014/bai2.pas
deleted file mode 100644
index 172137d..0000000
--- a/9/TP-Huế-2014/bai2.pas
+++ /dev/null
@@ -1,35 +0,0 @@
-var
-  a, b, c, e, p, k, tmp: real;
-
-function det(a, b, c, d: real): real;
-  begin
-    exit(a * d - b * c)
-  end;
-
-begin
-  read(a, b, c, e, p, k);
-
-  tmp := det(a, b, e, p);
-  
-  if tmp <> 0 then
-    begin
-      writeln('x = ', (det(c, b, k, p) / tmp):0:6);
-      writeln('y = ', (det(a, c, e, k) / tmp):0:6);
-      writeln('Hai đường thẳng cắt nhau.')
-    end
-  else if c <> k then
-    begin
-      writeln('Phương trình vô nghiệm.');
-      writeln('Hai đường thẳng song song.')
-    end
-  else
-    begin
-      if a = 0 then
-        writeln('y = ',  (c / b):0:6)
-      else if b = 0 then
-        writeln('x = ', (c / a):0:6)
-      else
-        writeln('x = ', (-b / a):0:6, 'y + ', (c / a):0:6);
-      writeln('Hai đường thẳng trùng nhau.')
-    end;
-end.