giả sử viết chương trình nhập một số tự nhiên từ bàn phím và in ra màn hình kết quả số đã nhập là số chẵn hay lẻ , chẳng hạn "5 là số lẻ ","8 là số chẵn" a) hãy mô tả các bước của thuật toán để giải quyết bài toán trên b) viết chương trình bằng ngôn ngữ lập trình pascal dựa trên thuật toán đã mô tả c) khởi động phần mền free pascal , soạn thảo, lưu, dịch, chạy chương trình dẫ viết ở câu 2 bằng bộ dữ liệu cụ thể
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.
#include <bits/stdc++.h>
using namespace std;
long long a;
int main()
{
cin>>a;
if (a%2==0) cout<<"La so chan";
else cout<<"La so le";
return 0;
}
- Thuật toán chương trình:
Bước 1: Nhập một số tự nhiên n và một biến d;
Bước 2: Gán giá d=n mod 2;
Bước 3: Nếu d=0 thì đấy là số chẵn, ngược lại thì đấy là số lẻ;
Bước 4. Kết thúc thuật toán;
- Chương trình Pascal:
- Kết quả:
#include <bits/stdc++.h>
using namespace std;
long long n;
int main()
{
cin>>n;
if (n%2==0) cout<<"Chan";
else cout<<"Le";
return 0;
}
Bước 1: Nhập số n (n là số tự nhiên)
Bước 2: Xét số dư khi chia n cho 2
Bước 3: Nếu số dư là 1 thì ghi ra màn hình n là số lẻ, ngược lại thì ghi ra màn hình n không là số lẻ
Bước 4: Kết thúc
uses crt;
var n:longint;
begin
clrscr;
readln(n);
if n mod 2=0 then write('la so chan')
else write('la so le');
readln;
end.
program bai1;
uses crt;
var a,b,c,s: real;
begin
clrscr;
write('nhap so thu nhat ='); readln(a);
write('nhap so thu hai ='); readln(b);
write('nhap so thu ba ='); readln(c);
s:=a+b+c;
writeln('tong ba so a,b,c =',s:4:2);
readln;
end.
program bai1;
uses crt;
var n: integer;
begin
clrscr;
write('nhap so n ='); readln(n);
if n mod 2 = 0 then
writeln('la so chan ') else
writeln('la so le ');
readln;
end.