a) Nếu b chia 2 dư 0 thì in ra màn hình “b là số chẵn”, ngược lại nếu b chia 2 dư 1 thì in ra màn hình “b là s hat o le^ prime prime
Cách 1: Viết hai câu lệnh điều kiện dạng thiếu:
if..
if...
a) Nếu b chia 2 dư 0 thì in ra màn hình “b là số chẵn”, ngược lại nếu b chia 2 dư 1 thì in ra màn hình “b là s hat o le^ prime prime
Cách 1: Viết hai câu lệnh điều kiện dạng thiếu:
if..
if...
if (b%2==0) cout<<"b la so chan";
if (b%2==1) cout<<"b la so le";
a) Nếu b chia 2 dư 0 thì in ra màn hình “b là số chẵn”, ngược lại nếu b chia 2 dư 1 thì in ra màn hình “b là s hat o le^ prime prime
Cách 1: Viết hai câu lệnh điều kiện dạng thiếu:
if..
if...
if (b%2==0) cout<<"b la so chan";
else cout<<"b la so le";
“Nếu b chia 2 dư 1 thì in ra màn hình b la so le” được thể hiện câu lệnh trong Pascal như thế nào?
A. If b/2=1 then Write(‘b la so le’);
B. If b mod 2=1 then Writeln(b la so le);
C. If b mod 2=1 then Write(‘b la so le’);
D. If b div 2=1 then Write(‘b la so le’);
Viết chương trình nhập vào hai số a và b. Nếu a<b thì in ra màn hình kết quả của a.
Hãy cho biết điều kiện của bài toán trên là gì?
Hãy cho biết câu lệnh của bài toán trên là gì?
Nhập vào 2 số a và b. Nếu a>b, thì in ra màn hình a ngược lại thì in ra b
a)
uses crt;
var i,n:integer;
begin
clrscr;
repeat
write('Nhap n='); readln(n);
until n<100;
if n mod 2=0 then
begin
for i:=0 to n do
if i mod 2=0 then write(i:4);
end
else writeln(n,' khong la so chan');
readln;
end.
b)
uses crt;
var i,n:integer;
begin
clrscr;
repeat
write('Nhap n='); readln(n);
until n<100;
if n mod 2=1 then
begin
for i:=1 to n do
if i mod 2=1 then write(i:4);
end
else writeln(n,' khong la so le');
readln;
end.
viết chương trình pascal cho bài toán sau : nếu a chia hết cho 2 thì in ra màn hình ' a là số chẵn ' và ngược lại 'a là số lẻ '
help !! mai nộp rùi , đây là tin hok lớp 8 nhé
program chanle;
uses crt;
var a:integer;
begin
write('nhap so a: ');readln(a)
if a mod 2=0 then writeln('a la so chan')
else writeln('a la so le');
realdn;
end.
progam KT_a_khi_chiacho_2;
uses crt;
var a:integer;
begin
Clrscr;
writeln(' Nhap so a ');
readln(a);
Ip (a mod 2 = 0 ) then writeln (a,' Chia het cho 2');
else Ip (a mod 2 <> 0 ) then writeln (a,' ko chia het cho 2');
readln;
end.
Cái này là mk tự vt ko chép mạng nên sai thì Sorry nhang.Trên mạng cx ko có đâu
Bn nên thử ở trên CT pascal trước r ghi vào cho chắc nhé!!!
Nếu a lớn hơn 0 thì thông báo ra màn hình a là số dương. Em hãy xác định điều kiện phía dưới để hoàn thành câu lệnh sau:
if……… then writeln( a,’ la so duong’) ;
A. a>=0 B. a<0 C. A>0 D. A>=0