var n,i:real ;
begin
write('nhập n'); read(n);
write('can bat 2 cua n la :',sqrt(h));
end.
program dua_ve_can_bac_hai;
uses crt;
var n: real;
begin
Writeln('Nhap N'); Readln(n);
Writeln('Can bac hai cua n la: ',SQRT(n));
Readln;
end.
var n,i:real ;
begin
write('nhập n'); read(n);
write('can bat 2 cua n la :',sqrt(h));
end.
program dua_ve_can_bac_hai;
uses crt;
var n: real;
begin
Writeln('Nhap N'); Readln(n);
Writeln('Can bac hai cua n la: ',SQRT(n));
Readln;
end.
Viết chương trình nhập từ bàn phím số nguyên n đưa ra màn hình tổng các số tự nhiên nhỏ hơn n và chia hết cho 2 và chia hết cho 3.
Viết chương trình nhập vào n số bất kì sau đó đưa ra màn hình số đó có 3 chữ số
viết chương trình nhập từ bàn phím số nguyên dương N( N<=100) và dãy số nguyên A1,A2,...An có trị tuyệt đối nhỏ hơn 1000. Đưa ra màn hình các thông tin sau :
a. Tổng số nguyên chẵn , tổng số nguyên lẻ của dãy số.
b.Tổng giá trị của dãy số .
ai giúp em với ạ, em xin cám ơn
Nhập vào bàn phím mảng 1 chiều gồm N số nguyên:
1.In ra màn hình giá trị lớn nhất
2. Tính tổng các số chẵn các số chẵn có trong mảng
3. Thông báo có bao nhiêu số âm trong mảng
4. Tính tích các phần tử dương và chia hết cho 3
( mik cần gấp lém :(( )
Cho y:=50; Câu lệnh Writeln(y) sẽ:
A. Hiện ra màn hình số 50
B. Nhập só 50 từ bàn phím
C. hiện ra màn hình chữ y