Cấu trúc rẽ nhánh và lặp

Đinh Hoàng Nhất Quyên
Xem chi tiết
Nguyễn Lê Phước Thịnh
29 tháng 8 2023 lúc 20:53

uses crt;

var a:real;

begin

clrscr;

readln(a);

if (a>=9) then write('A')

else if ((7<=a) and (a<9)) then write('B')

else if ((5<=a) and (a<7)) then write('C')

else write('D');

readln;

end.

Bình luận (0)
nguyen đức mạnh
29 tháng 8 2023 lúc 20:55

python
 

diem_tb = float(input("Nhập điểm trung bình của học sinh: "))

if diem_tb >= 9:
    loai = 'A'
elif diem_tb >= 7:
    loai = 'B'
elif diem_tb >= 5:
    loai = 'C'
else:
    loai = 'D'

print("Loại học sinh: ", loai)


Pascal
 

program PhanLoaiHocSinh;
var
  diem_tb: real;
  loai: char;
begin
  write('Nhap diem trung binh cua hoc sinh: ');
  readln(diem_tb);

  if diem_tb >= 9 then
    loai := 'A'
  else if diem_tb >= 7 then
    loai := 'B'
  else if diem_tb >= 5 then
    loai := 'C'
  else
    loai := 'D'

  writeln('Loai hoc sinh: ', loai);
end.

Bình luận (0)
Nguyễn Hoàng Duy
30 tháng 8 2023 lúc 14:31

var TB:real;
begin
    readln(TB);
    if TB>=9 then
        writeln('A')
    else if TB>=7 then
        writeln('B')
    else if TB>=5 then
        writeln('C')
    else
        writeln('D');
   readln;
end.

 

Bình luận (0)
Phạm Yến
Xem chi tiết
Nobody
Xem chi tiết
Nguyễn Lê Phước Thịnh
18 tháng 7 2022 lúc 23:06

#include <bits/stdc++.h>

using namespace std;

long long n,gt;

int main()

{

cin>>n;

gt=1;

for (int i=1; i<=n; i++) gt*=i;

cout<<gt;

return 0;

}

Bình luận (0)
Kiều Vũ Linh
19 tháng 7 2022 lúc 13:56

Viết bằng Pascal:

Var n,i gt:longint;

Begin

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

gt:=1;

For i:=1 to n do gt:=gt*i;

Write(n,'! = ',gt);

Readln;

End.

Bình luận (0)
Hà Văn Tài
Xem chi tiết
Kiều Vũ Linh
18 tháng 4 2022 lúc 11:08

var a:array [1..100] of integer;

i,n,dem:integer;

begin

write('Nhap so luong so N = ');readln(n);

for i:=1 to n do

begin

write('Nhap vao so thu ',i,': ');readln(a[i]);

if a[i] mod 3 = 0 then dem:=dem+1;

end;

write('Co ',dem,' so chia het cho 3');

readln;

end.

Bình luận (0)
Nguyễn Lê Phước Thịnh
18 tháng 4 2022 lúc 11:05

#include <bits/stdc++.h>

using namespace std;

long long a[1000],i,n,dem;

int main()

{

cin>>n;

for (i=1; i<=n; i++) cin>>a[i];

dem=0;

for (i=1; i<=n; i++)

if (a[i]%3==0) dem++;

cout<<dem;

return 0;

}

Bình luận (0)
Light Stars
Xem chi tiết
Vũ Ngọc Lan
Xem chi tiết
Chu Khả Doanh
Xem chi tiết
Nguyễn Lê Phước Thịnh
14 tháng 3 2022 lúc 15:59

Câu 1: C

Câu 2: C

Câu 3: D

Câu 4: C

Câu 5: D

Câu 6: B
Câu 7: B

Câu 9: B

Câu 10: D

Bình luận (0)