Những câu hỏi liên quan
loli
Xem chi tiết
Bùi Anh Tuấn
4 tháng 1 2021 lúc 20:26

Bình luận (0)
Nguyễn Lê Phước Thịnh
4 tháng 1 2021 lúc 21:26

uses crt;

var diem:real;

begin

clrscr;

repeat

write('Nhap diem trung binh:'); readln(diem);

until (0<=diem) and (diem<=10);

if diem<5 then writeln('Xep loai yeu')

else if (5<=diem) and (diem<6.5) then writeln('Xep loai trung binh')

else if (6.5<=diem) and (diem<8.0) then writeln('Xep loai kha')

else writeln('Xep loai gioi');

readln;

end.

Bình luận (0)
loli
4 tháng 1 2021 lúc 20:15

help

Bình luận (0)
Anh Lê duy
Xem chi tiết
Anh Lê duy
Xem chi tiết
❖ Khang/GD❄ 『ʈєɑɱ❖Hoàng...
26 tháng 12 2021 lúc 8:20

Anh ơi, anh nhầm khối rồi ạ nên anh chuyển lên lớp 12 hỏi chứ bọn em mới lớp 6 chx hiểu về mấy cái này nên anh thông cảm

Bình luận (0)
Anh Lê duy
Xem chi tiết
nguyen van mui
Xem chi tiết
Bùi Thế Vinh
Xem chi tiết
Duy Minh
Xem chi tiết
Nguyễn Lê Phước Thịnh
19 tháng 12 2021 lúc 23:42

 

#include <bits/stdc++.h>

using namespace std;

double a,b,c,tb;

int main()

{

cin>>a>>b>>c;

tb=(a+b+c)/3;

cout<<fixed<<setprecision(1)<<tb<<endl;

if (tb>=8) cout<<"Gioi";

else if ((6.5<=tb) and (tb<8)) cout<<"Kha";

else if ((5<=tb) and (tb<=6.5)) cout<<"Trung Binh";

else cout<<"Chua dat";

return 0;

}

Bình luận (1)
Tuấn Trần thị
Xem chi tiết
Kiều Vũ Linh
10 tháng 5 2023 lúc 17:41

Var a:array:[1..50] of real;

i,max:integer;

Begin

For i:=1 to 50 do

Begin

Write('Nhap so thu ',i,' = ');readln(a[i]);

End;

Write('Cac diem vua nhap la: ');

For i:=1 to 50 do 

Write(a[i]:10:2);

Writeln;

max:=a[1];

For i:=2 to 50 do

if a[i]>max then max:=a[i];

Write('Diem trung binh lon nhat la ',max:10:2);

Readln

End.

Bình luận (1)
Kiều Vũ Linh
10 tháng 5 2023 lúc 17:44

Var a:array:[1..50] of real;

i:integer;

max:real;

Begin

For i:=1 to 50 do

Begin

Write('Nhap diem thu ',i,' = ');readln(a[i]);

End;

Write('Cac diem vua nhap la: ');

For i:=1 to 50 do 

Write(a[i]:10:2);

writeln;

max:=a[1];

For i:=2 to 50 do

if a[i] > max then max:=a[i];

write('Diem lon nhat la ',max:10:2);

Readln

End.

Bình luận (1)
Hương Phạm
Xem chi tiết
Nguyễn Lê Phước Thịnh
19 tháng 12 2021 lúc 23:46

 

 

#include <bits/stdc++.h>

using namespace std;

double a,b,c,tb;

int main()

{

cin>>a>>b>>c;

tb=(a+b+c)/3;

cout<<fixed<<setprecision(1)<<tb<<endl;

if (tb>=8) cout<<"Gioi";

else if ((6.5<=tb) and (tb<8)) cout<<"Kha";

else if ((5<=tb) and (tb<=6.5)) cout<<"Trung Binh";

else cout<<"Chua dat";

return 0;

}

Bình luận (0)