Môn tin. Viết chương trình nhập vào 2 số nguyên dương a,b (đk a
Những câu hỏi liên quan
Câu 1: Viết chương trình nhập vào 2 số nguyên a,b. Kiểm tra a,b cùng dáu hay trái dấu ( cùng âm hoặc cùng dương hoặc âm, dương hoặc dương, âm)
Câu 2: Viết chương trình nhập vào 2 số nguyên a,b. Kiểm tra tính chẵn lẻ ( cùng lẻ hoặc cùng chẵn hoặc.......)
Câu 1:
uses crt;
var a,b:integer;
begin
clrscr;
write('Nhap a='); readln(a);
write('Nhap b='); readln(b);
if (a>0) and (b>0) then writeln('Cung duong');
if (a<0) and (b<0) then writeln('Cung am');
if (a>0) and (b<0) then writeln('Duong am');
if (a<0) and (b>0) then writeln('Am duong');
readln;
end.
Câu 2:
uses crt;
var a,b:integer;
begin
clrscr;
write('Nhap a='); readln(a);
write('Nhap b='); readln(b);
if (a mod 2=0) and (b mod 2=0) then writeln('Cung chan');
if (a mod 2<>0) and (b mod 2<>0) then writeln('Cung le');
if (a mod 2=0) and (b mod 2<>0) then writeln('Chan le');
if (a mod 2<>0) and (b mod 2=0) then writeln('Le chan');
readln;
end.
Đúng 1
Bình luận (1)
Viết chương trình nhập vào 2 số nguyên dương a,b (a b
Var a,b:Integer;
Begin
Clrscr;
Write(' Nhap a, b');
Read(a,b);
End.
Đúng 0
Bình luận (0)
Viết chương trình nhập từ bàn phím số nguyên dương A và số nguyên X.Kiểm tra xem X có là ước chẵn của A hay không?Kết quả hiển thị ra màn hình.Giúp Mik vs môn tin học
Xem thêm câu trả lời
MÔN TIN 8
Câu 1 viết chương trình kiểm tra tính chẵn lẻ của một số nguyên dương
Câu 2 : Viết chương trình nhập vào 3 cạnh của tam giác , kiểm tra và đưa ra màn hình : tam giác thường, tam giác cân , tam giác đều , tam giác vuông
Bài 1: Viết chương trình nhập số nguyên dương n. Tính tổng các số chẫn chia hết cho 3 nhỏ hơn hoặc bằng n
Bài 2: Viết chương trình nhập vào 3 số nguyên dương a, b, c. Tìm ước chung lớn nhất của 3 số
Bài 1:
uses crt;
var n,i,s:integer;
begin
clrscr;
write('Nhap n='); readln(n);
s:=0;
for i:=1 to n do
if i mod 6=0 then s:=s+i;
writeln(s);
readln;
end.
Đúng 1
Bình luận (0)
Bài 2:
uses crt;
var a,b,c,ucln,i:integer;
begin
clrscr;
write('a='); readln(a);
write('b='); readln(b);
write('c='); readln(c);
while a<>b do
begin
if a>b then a:=a-b
else b:=b-a;
end;
ucln:=a;
while ucln<>c do
begin
if ucln>c then ucln:=ucln-c
else c:=c-ucln;
end;
writeln(ucln);
readln;
end.
Đúng 1
Bình luận (0)
Scratch hay java
viết chương trình nhập vào hai số a và b in ra màn hình hai số lớn a và bMôn tin
Xem chi tiết
program bai1;
uses crt;
var a,b: integer;
begin
clrscr;
write('nhap so a ='); readln(a);
write('nhap so b ='); readln(b);
writeln(' hai so vua nhap la so: ' ,a,' va ',b);
if a> b then writeln('so lon nhat la : ' ,a) else
writeln('so lon nhat la : ' ,b);
readln;
end.
program ho_tro;
uses crt;
var a,b,max: real;
begin
clrscr;
writeln(' nhap a va b:'); readln(a,b);
max:=a;
max:=b;
if max<a then max:=a;
if max<b then max:=b;
writeln(' so lon nhat la :',max);
readln;
end.
lần sau nếu có hỏi j về tin thì qua bên h mik sẽ giúp
Viết chương trình nhập vào 2 số nguyên dương a và b. Hỏi tổng số là bao nhiêu?
program cau_1;
uses crt;
var a,b,s:integer;
begin
clrscr;
write('nhap so a:'); readln(a);
writeln('nhap so b:');readln(b);
s:=0;
s:=a+b;
writeln('tong hai so a, b la:',s);
readln;
end.
Đúng 1
Bình luận (0)
Var a,b:longint;
begin
write('Nhap so nguyen a = ');readln(a);
write('Nhap so nguyen b = ');readln(b);
write('Tong cua ',a,' va ', b,' la ',a+b);
readln;
end.
Đúng 0
Bình luận (0)
Viết chương trình nhập vào 2 số nguyên dương a và b, cho biết kết quả chia lấy phần
dư của a với b.
#include <iostream>
using namespace std;
int main()
{
int a,b;
cout<<"Nhap so a="; cin>>a;
cout<<"Nhap so b="; cin>>b;
cout<<a%b;
return 0;
}
Đúng 0
Bình luận (0)
program chia_phan_du;
uses crt;
var a, b: integer;
begin
clrscr;
write('Nhap 2 so nguyen a va b: ');
readln(a, b);
writeln('Ket qua chia lay phan du la: ', a mod b);
end.
Đúng 0
Bình luận (0)
C1.Viết chương trình tính tổng hai số A và B với A, B là 2 số được nhập từ bàn phím C2. Viết Chương trình nhập vào ba số nguyên a, b, c. tính a+b-c. C3.Viết Chương trình tính hiệu a - b với a,b là hai số nguyên nhập từ bàn phím. C4.Chương trình nhập vào 3 số x, y, z. Tính (x+y)*z Giúp em với ạ em cảm ơn nhiều lắm ạ
Câu 1:
uses crt;
var a,b:integer;
begin
clrscr;
readln(a,b);
write(a+b);
readln;
end.
Câu 2:
uses crt;
var a,b,c:integer;
begin
clrscr;
readln(a,b,c);
writeln(a+b-c);
readln;
end.
Đúng 1
Bình luận (0)
Câu 3:
uses crt;
var a,b:integer;
begin
clrscr;
readln(a,b);
writeln(a-b);
readln;
end.
Câu 4:
uses crt;
var x,y,z:integer;
begin
clrscr;
readln(x,y,z);
writeln((x+y)*z);
readln;
end.
Đúng 1
Bình luận (0)