Cho một số nguyên x . kiểm tra xem x là số chẵn lẻ . Em hãy :
a. xác định bài toán
b. mô tả thuật toán
c. viết chương trình pascal thể hiện thuật toán
TIN 8 GIÚP MK CÁI ~.~
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
Thuật toán:
B1: Nhập số nguyên n
B2: Nếu n >0 thì in ra màn hình n là số dương; nếu n <0 thì in ra màn hình n là số âm; nếu n = 0 thì in ra màn hình n không dương cũng không âm.
B3. Kết thúc
Chương trình:
uses crt;
var n: integer;
begin
write('Nhap so N: '); readln(n);
if n > 0 then writeln(n,' la so nguyen duong') else if n = 0 then writeln(n,' khong la so am cung khong la so duong') else writeln(n, ' la so nguyen am');
a)
input: a
output: a có chia hết cho 3 ko?
b)
B1: nhập a
B2: nếu a mod 3=0 thì a chia hết cho 3, nếu a mod 3 <>0 thì a ko chia hết cho 3
B3: thông báo a chia hết cho 3 ko
B4: kết thúc.
c)
var
a:integer;
begin
write('nhập a=');
readln(a);
if a mod 3=0 then wirteln(a,' chia hết cho 3')
else
writeln(a,' ko chia hết cho 3');
readln
end.
var n:integer;
begin
assign(input,'CHIA3.inp');reset(input);
assign(output,'CHIA3.out');rewrite(output);
read(n);
if n mod 3 = 0 then write('n chia het cho 3')
else write('n khong chi het cho 3');
end.
a: Input: Số a
Output: Kiểm tra xem a là số chẵn hay lẻ
b:
Bước 1: Nhập a
Bước 2: Nếu a chia hết cho 2 thì xuất a là số chẵn
không thì a là số lẻ
Bước 3: Kết thúc
c:
uses crt;
var a:integer;
begin
clrscr;
readln(a);
if a mod 2=0 then write('a la so chan')
else write('a la so le');
readln;
end.
c:
#include <bits/stdc++.h>
using namespace std;
long long i,n,t,j;
bool kt;
int main()
{
t=0;
for (i=2; i<=50; i++)
{
kt=true;
for (j=2; j*j<=i; j++)
if (i%j==0) kt=false;
if (kt==true) t=t+i;
}
cout<<t;
return 0;
}
a) xác định
input: x
output: x là chẵn hay lẻ
b)
B1: nhập x
B2: Nếu x chia hết cho 2 thì x là số chẵn, không chia hết thì là số chẵn
B3: trả lời số x là số chẵn hay là số lẻ
B4: kết thúc thuật toán.
c)
var
x:integer;
begin
write("nhập x=");
readln(x);
if x mod 2=0 then writeln(x," là số chẵn")
else
writeln(x," là số lẻ");
readln;
end.