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.

Câu 2: 

uses crt;

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

i,n,t:integer;

begin

clrscr;

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

for i:=1 to n do

begin

write('A[',i,']='); readln(a[i]);

end;

t:=0;

for i:=1 to n do 

if (4<a[i]) and (a[i]<15) then t:=t+a[i];

writeln(t);

readln;

end.

19 tháng 12 2021

#include <bits/stdc++.h>

using namespace std;

int main()

{

cout<<"...";

cout<<"Truong THCS&THPT Phu Thanh";

cout<<"Lop";

return 0;

}

uses crt;

var a,b,c:integer;

begin

clrscr;

readln(a,b,c);

a:=sqr(a);

b:=sqr(b);

c:=sqr(c);

writeln((a+b+c)/3:4:2);

readln;

end.

19 tháng 2 2022

dạ cho em hỏi sqc là gì vậy ạ :<

uses crt;

var n:integer;

begin

clrscr;

readln(n);

writeln(n);

readln;

end.

19 tháng 4 2023

loading...  

19 tháng 4 2023

không nhắn linh tinh? ở đây chỉ nhắn để hỏi bài thôi nhé :)