BT1: Viết chương trình tổng hiệu tích thương của 2 số nguyên nhập từ bàn phím( viết các câu lệnh giống trên pascal nhes) BT2: Viết chương trình kiểm tra 1 số nguyên nhập từ bàn phím là số nguyên hay số lẽ BT3: Nhập vào hai số nguyên tính 2x+3y ( tấc cả bài trên các bạn đều lm ra giống như viết trên pascal thế nhé)
2 câu trả lời
BT1
var a,b:longint;
begin
readln(a,b);
writeln('Tong ',a+b);
writeln('Hieu ',a-b);
writeln('Tich ',a*b);
writeln('Thuong ',a mod b);
readln;
end.
BT2
var n:longint;
begin
readln(n);
if (n mod 2 = 0) then writeln(n,' la so chan')
else writeln(n,' la so le');
readln;
end.
BT3
var x,y:longint;
begin
readln(x,y);
writeln('Ket qua = ',(2*x)+(3*y));
readln
end.
BT1
uses crt;
var a,b:integer;
begin
clrscr;
write('Nhap a,b: ');
readln(a,b);
writeln('Tong: ',a+b);
writeln('Hieu: ',a-b);
writeln('Tich: ',a*b);
writeln('Thuong: ',a/b:0:3);
readln;
end.
BT2 Nhập số thực chứ số nguyên thì tất nhiên nó là nguyên rồi :))
uses crt;
var n:real;
begin
clrscr;
write('Nhap n: ');
readln(n);
if frac(n) = 0 then write(n:0:0,' la so nguyen')
else write(n:0:3,' la so le');
readln;
end.
BT3
uses crt;
var x,y:integer;
begin
clrscr;
write('Nhap x,y: ');
readln(x,y);
writeln('Ket qua: ',2*x+3*y);
readln;
end.
Câu hỏi trong lớp
Xem thêm
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết giúp các em luyện tập và củng cố kiến thức hiệu quả
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 5 Địa 8 có lời giải chi tiết
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 4 Địa 8 có lời giải chi tiết
