* viết chương trình để in ra màn hình nội dung sau : ” lop 8 truong THCS an le ” Họ lập trình Pascal * viết chương trình

0 bình luận về “* viết chương trình để in ra màn hình nội dung sau : ” lop 8 truong THCS an le ” Họ lập trình Pascal * viết chương trình”

1. *

   program ct;

   uses crt;

   begin

   clrscr;

   writeln(‘lop 8 truong THCS an le’);

   writeln(‘ho lap trinh pascal’);

   readln

   end.

   *

   program ct;

   uses crt;

   var a,h,DT:real;

   begin

   clrscr;

   write(‘nhap duong cac=’);readln(h);

   write(‘nhap do dai canh=’);readln(a);

   DT:=1/2*a*h;

   writeln(‘dien tich tam giac la:’,DT);

   readln

   end.

   Bình luận

2. * viết chương trình để in ra màn hình nội dung sau : ” lop 8 truong THCS an le ”

   uses crt;

   begin

   clrscr;

   write (‘lop 8 truong THCS an le’);

   readln;

   end.

   * viết chương trình tính diện tích tam giác biết đường cao và độ dài tương ứng là các số tự nhiên .

   uses crt;

   var a,h: integer;

   begin

   clrscr;

   write (‘Nhap duong cao h: ‘); readln(h);

   writeln (‘Nhap canh a : ‘); readln(a);

   write (‘Dien tich tam giac la: , 1/2 * a *h);

   readln;

   end.

   Bình luận