Question

Câu 1: Viết chương trình tính CV, S hình vuông có cạnh a được nhập từ bàn phím bằng ngôn ngữ lập trình Pascal

Câu2: Viết chương trình tính tổng 2 số nguyên dương nhập từ bàn phím

Câu 3: Viết chương trình tính S của tam giác với độ dài 1 cạnh a và chiều cao tương ứng ( a,h là các số tự nhiên được nhập từ bàn phím)

Mọi người giúp mk vs, mai mk ktra r. Cảm ơn trc ạ ^^

Answer 1

uses crt;

var

a,b: integer;

begin

clrscr;

write('Nhap so thu nhat: ');readln(a);

write('Nhap so thu hai: ');readln(b);

writeln('Tong ',a,' va ',b,' la: ',a+b);

readln

end.

Answer 2

Câu 1:

Var

cv,s,a:integer;

begin

write('nhap vao canh hinh vuong:');readln(a);

s:=a*a;

cv:=a*4;

Writeln('chu vi hinh vuong la:',cv);

WRiteln('dien tich hinh vuong la:',s);

readln

end.

Answer 3

câu 3:

Var

s,h,a:integer;

begin

write('nhap vao canh hinh vuong:');readln(a);

write('nhap vao chieu cao tuong ung:');readln(h);

s:=(a*h) mod 2;

WRiteln('dien tich hinh vuong la:',s);

readln

end.