Cho số nguyên dương N (100<=N<=1000000). Ghi ra 3 số nguyên tố lớn nhất nhỏ hơn N theo chiều từ lớn đến nhỏ.
xin trả lờ nhanh giúp tui
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 1. Để căn lề cho một đoạn văn bản nào đó trong giáo án điện tử đang thiết kế, trước tiên ta phải làm là:
A. Đưa con trỏ chuột vào giữa đoạn văn bản cần căn lề
B. Vào nút lệnh Home
C. Chọn cả đoạn văn bản phía dưới đoạn văn bản cần căn lề
D. Chọn một dòng bất kỳ trong đoạn văn bản cần căn lề
uses crt;
var x,t,i:integer;
begin
clrscr;
t:=0;
repeat
readln(x);
t:=t+x;
until x=0;
write(t);
readln;
end.
uses crt;
var i,n,dem:integer;
begin
clrscr;
readln(n);
dem:=0;
i:=1;
while i<=n do
begin
if trunc(sqrt(i))=sqrt(i) then begin inc(dem); write(i:4);
end;
i:=i+1;
end;
writeln;
writeln(dem);
readln;
end.
uses crt;
var a:integer;
begin
clrscr;
readln(a);
write(a);
readln;
end.
Viết CT nhập vào mảng 1 chiều các số nguyên. a. Tính tổng các số chẵn b. Hiển thị các số ở vị trí lẻ
uses crt;
var a:array[1..100]of integer;
i,n,t:integer;
begin
clrscr;
readln(n);
for i:=1 to n do readln(a[i]);
t:=0;
for i:=1 to n do
if a[i] mod 2=0 then t:=t+a[i];
writeln(t);
for i:=1 to n do
if i mod 2=1 then write(a[i]:4);
readln;
end.
giả sử số thực là r
khi đó viết số thực r mà phần thập phân có 2 chữ số ta viết như sau:
r:10:2 có nghĩa là dùng 10 chữ số để viết số thực r, trong đó có 2 chữ số thập phân