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.

4 tháng 12 2016

program CT_dautien;

uses crt;

var

begin

clrscr;

writeln('moi nhap diem'); readln(x);

if x>= 8.0 then write(x, ' la loai gioi');

if x>=6.5 then write(x, ' la loai kha');

if x>=5.0 then write(x, ' la loai trung binh');

if x>=3.4 then write(x, ' la loai yeu');

if x<3.4 then write(x, ' la loai kem');

readln

end.

4 tháng 12 2016

y quen cho var ban ghi la: var x: integer

23 tháng 12 2021

Help

23 tháng 12 2021

Mình viết ở ngôn ngữ c++ nhé:

#include<iostream> 

using namespace std; 

int main() { 

double a; 

  cout << "Diem trung binh : "; cin >> a;

if (a >= 1 && a <= 10) { 

  if (a >= 8) { 

    cout << "Gioi"; 

} else if (a >= 6.5 && a <= 7.9) { 

    cout << "kha"; 

} else if (a <= 6.4 && a >= 5) { 

    cout << "trung binh"; 

} else { 

    cout << "yeu"; 

     }

} else {

    cout << "Diem so khong hop le";

     } 

return 0; 

}

 

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.

4 tháng 6 2019

uses crt;
var a,b,s:integer;
begin
clrscr;
write('Nhap so A co 2 chu so: ');readln (a);
if (a>9) and (a<100) then begin
s:=0;
while a<>0 do
begin
b:=a mod 10;
a:=a div 10;
s:=s+b;
end;
write('Tong 2 chu so A la: ',s); end else write('So A nhap vao khong thoa man');
readln;
end.

9 tháng 6 2019

bn lm sai r

9 tháng 5 2021

Ngôn ngữ gì vậy bạn ?

9 tháng 5 2021

Ngôn ngữ tin học 8

19 tháng 12 2021

2:

#include <bits/stdc++.h>

using namespace std;

long long a,b;

int main()

{

cin>>a>>b;

cout<<a%b<<endl;

cout<<a/b;

return 0;

}

19 tháng 12 2021

Bài 3: 

#include <bits/stdc++.h>

using namespace std;

long long a,b;

int main()

{

cin>>a>>b;

cout<<a%b;

cout<<a/b;

return 0;

}