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.

16 tháng 12 2022

a=int(input('a='))

print('Bình phương của a:', a**2)

16 tháng 12 2022

đây là cửa sổ code à bạn 

10 tháng 12 2021

2:

#include <bits/stdc++.h>

using namespace std;

long long n,i;

int main()

{

cin>>n;

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

if (n%i==0) cout<<i<<" ";

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 ạ :<

11 tháng 3 2023

a = []

sum = 0

n = 5

# Nhập danh sách a

for i in range(n):

     x = int(input("Nhập phần tử thứ " + str(i+1) + ": "))

     a.append(x)

# Tính tổng các phần tử trong danh sách a

for i in range(n):

     sum += a[i]

# In ra màn hình tổng các phần tử trong danh sách a

print("Tổng các phần tử trong danh sách a là: ", sum)

uses crt;

var a,b:integer;

begin

clrscr;

readln(a,b);

writeln('Tong hai so la: ',a+b);

writeln('Tong binh phuong hai so la: ',sqr(a)+sqr(b));

readln;

end.

c1: 

#include <bits/stdc++.h>

using namespace std;

long long i,n,s;

int main()

{

cin>>n;

s=1;

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

cout<<s;

return 0;

}

Câu 2: 

#include <bits/stdc++.h>

using namespace std;

long long i,n,s;

int main()

{

cin>>n;

s=1;

for (i=1; i<=n; i++) if (i%2==0) s=s*i;

cout<<s;

return 0;

}

7 tháng 2 2023

 

uses crt;

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

i,t:integer;

begin

for i:=1 to 10 do 

  begin

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

end;

t:=0;

for i:=1 to 10 do 

  t:=t+a[i];

writeln('Tong cua day la: ',t);

writeln('Trung binh cong cua day la: ',t/n:4:2);

readln;

end.

17 tháng 4 2021

program in_mang;

uses crt;

var i,n,max:longint;

a:array[1..100]of longint;

begin

clrscr;

write('nhap so n:');readln(n);

for i:=1 to n do

begin

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

end;

writeln('cac phan tu chan:');

for i:=1 to n do

if a[i] mod 2=0 then write(a[i]:3);

writeln;

max:=a[1];

for i:=1 to n do

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

writeln('max cua day la:',max);

readln;

end.

uses crt;

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

i,n,max:integer;

begin

clrscr;

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

for i:=1 to n do 

 begin

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

end;

for i:=1 to n do 

  if a[i] mod 2=0 then write(a[i]:4);

writeln;

max:=a[1];

for i:=1 to n do

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

writeln(max);

readln;

end.