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.

17 tháng 10 2018

đề cụ thể đi bạn đề không rõ lắm

14 tháng 3 2021

15 tháng 3 2021

Mình nhớ có clsrcr với write nữa mà đúng không bạn 

18 tháng 11 2021

#inlude<iostream>

using namespace std;

int main() {

    int a, b, c;

   cout << "Điểm toán : "; cin >> a;

   cout << "Điểm văn : "; cin >> b;

   cout << "Điểm Anh : "; cin >> c;

   int d = 2 * a;

   int g = 2 * b;

   int h = d + g + c;

  cout << "Điểm trung bình môn toán, văn, anh là: " << h / 3;

  return 0;

}

18 tháng 11 2021

cám mơn bạn tốt bụng này nhe eoeo

26 tháng 4 2022

program b1;
uses crt;
var i,n,dat,chuadat:integer;
a:array[1..100] of integer;
begin
clrscr;
write('Nhap tong so ban trong lop:');
readln(n);
for i:=1 to n do  readln(a[i]);
dat:=0; chuadat:=0;
for i:=1 to n do
begin
if (a[i]>=5) then inc(dat);
if (5>=a[i]) then inc(chuadat);
end;
writeln('So hoc sinh dat la:',dat);
writeln('So hoc sinh chuadat la:',chuadat);
readln;
end.

Tham khao!

26 tháng 4 2022

Phần xổ số miên là mình viết nhầm

Nó là: xử dụng biến mảng nha

29 tháng 6 2018

19 tháng 3 2018

Sau tháng thứ nhất, số tiền còn lại là

Sau tháng thứ hai số tiền còn lại là

Sau 12 tháng số tiền còn lại là

Chọn D.

Sau tháng thứ nhất, số tiền còn lại là

Sau tháng thứ hai số tiền còn lại là

Sau 12 tháng số tiền còn lại là

 

 

 

uses crt;

var a,b,c,tb:array[1..10]of real;

ln,nn:real;

n:integer;

i:integer;

begin

clrscr;

readln(n);

for i:=1 to n do readln(a[i],b[i],c[i]);

for i:=1 to n do 

  tb[i]:=(a[i]+b[i]+c[i])/3;

for i:=1 to n do

writeln(tb[i]:4:2);

readln;

end.

 

20 tháng 3 2022

Program HOC24;

var i,t: integer;

begin

t:=0;

for i:=1 to 20 do t:=t+i;

write(t);

readln

end.