K
Khách

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.

Đây là một ví dụ về phương trình kiểm tra số nguyên a là số chẵn hay số lẻ trong Scratch:

 

```scratch

Nhập "a" từ bàn phím

Nếu (a % 2 = 0) thì

    Hiển thị "a là số chẵn"

Ngược lại

    Hiển thị "a là số lẻ"

Kết thúc

```

 

Trong đó, `%` là toán tử chia lấy phần dư, và nếu `a % 2` bằng 0, thì số đó là số chẵn; ngược lại, là số lẻ.

10 tháng 1

when green flag clicked
ask "Nhập số nguyên a:" and wait
set a to ((a) / (2)) * (2)
if (a) = (a) then
  say "Số nguyên a là số chẵn"
else
  say "Số nguyên a là số lẻ"
end

 

7 tháng 12 2021

mình chưa hiểu rõ đề lắm nên mình sẽ làm tạm như thế này còn nếu bạn muốn kiểu khác thì cứ bình luận để mình làm lại.

câu 1 :

#include<iostream>

using namespace std;

int main() {

long long a;

cout << "giá trị của a: "; cin >> a;

if (a % 2 != 0 && a % 5 == 0) {

cout << "a là một số lẻ chia hết cho 5"

} else {

cout << "a không phải là một số lẻ chia hết cho 5";

}

return 0;

}

câu 2 :

#include<iostream>

using namespace std;

int main() {
int a;

cout << "giá trị của a là: "; cin >> a;

if (a % 2 == 0 && a % 5 == 0) {

cout << "a là một số chẵn chia hết cho 5";

} else {
cout << "a không phải là một số chẵn chia hết cho 5";

}

return 0;

}

(Mình viết ở ngôn ngữ C++)

20 tháng 12 2021

program So_chan_hay_le;

uses crt;

var m : integer;

begin

clrscr;

writeln('Nhap so m'); readln(m);

if m mod 2 = 0 then

writeln('Day la so chan')

else writeln('Day la so le');

readln;

end.

20 tháng 12 2021

Giúp mik v

11 tháng 11 2021

uses crt;

var a:int64;

begin

clrscr;

readln(a);

if a mod 2=0 then writeln('la so chan')

else writeln('la so le');

readln;

end.

21 tháng 12 2020

uses crt;

var n:integer;

begin

clrscr;

repeat

write('Nhap n='); readln(n);

until n>0;

if n mod 2=0 then writeln(n,' la so chan')

else writeln(n,' la so le');

readln;

end.

16 tháng 12 2021

Uses crt;

Var a, b, c:real;

Begin

Readln(a);

Readln(b);

Readln(c);

If (a + b > c) or (a + c > b) or (b + c > a) then writeln('tam giác')

Else writeln('Khong phai tam giac');

Readln

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.

7 tháng 5 2022

Var n,i,souoc:integer;

Begin

Write('Nhap N = ');readln(n);

souoc:=0;

For i:=1 to n do

If n mod i = 0 then souoc:=souoc+1;

If souoc=2 then write(n,' la so nguyen to')

Else write(n,' khong la so nguyen to');

Readln;

End.

20 tháng 3 2023

program KiemTraSoNguyenTo;
var
  N, i: integer;
  IsPrime: boolean;
begin
  write('Nhap N: ');
  readln(N);

  IsPrime := true;
  if (N < 2) then
    IsPrime := false
  else
    for i := 2 to trunc(sqrt(N)) do
      if (N mod i = 0) then
      begin
        IsPrime := false;
        break;
      end;

  if IsPrime then
    writeln(N, ' la so nguyen to')
  else
    writeln(N, ' khong la so nguyen to');

  readln;
end.