Các bạn ra những câu hỏi tương tự giống các câu sau được ko vậy:
a/ Viết chương trình nhập vào 2 số a,b. Tính tổng, hiệu, tích, thương và in ra kết quả trong chương trình pascal.
b/ Viết chương trình nhập vào 2 số a,b. So sánh a,b và in ra kết quả.
(Bạn thông cảm, do đề không nói rõ nên mình cho các biến a, b đều là kiểu số thực để phòng a, b là STP)
Câu a:
program Tinh_toan;
uses crt;
var a, b: real;
Begin
clrscr;
write(‘Nhap a: ‘); readln(a);
write(‘Nhap b: ‘); readln(b);
writeln(‘a + b = ‘, a+b:0:2);
writeln(‘a – b = ‘, a-b:0:2);
writeln(‘a * b = ‘, a*b:0:2);
writeln(‘a / b = ‘, a/b:0:2);
readln;
End.
Câu b:
program So_sanh;
uses crt;
var a, b: real;
Begin
clrscr;
write(‘Nhap a: ‘); readln(a);
write(‘Nhap b: ‘); readln(b);
if (a>b) then writeln(‘a lon hon b’)
else if (a=b) then writeln(‘a bang b’)
else writeln(‘a be hon b’);
readln;
End.