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.
uses crt;
var n,i:integer;
begin
clrscr;
readln(n);
for i:=1 to n do
if (n mod i=0) and (i%2=1) then write(i:4);
readln;
end.
Program tim_gia_tri_lon_nhat thiếu ;
=> Program tim_gia_tri_lon_nhat;
clrscr thiếu;
=> clrscr;
Các câu ở dưới bạn cũng thêm dấu; nhé
Lưu ý: lệnh readln không cần ; cũng chạy được chương trình ( Mình làm rồi, nên bạn có thể tin mình )
Bạn chú ý dấu; nha. Nếu ko có là sai hết chương trình đó
uses crt;
var a:array[1..1000]of integer;
n,i,k,min,vt:integer;
begin
clrscr;
write('Nhap n='); readln(n);
if n=0 then writeln('Moi ban nhap lai')
else begin
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
for i:=1 to n do
write(a[i]:4);
writeln;
min:=a[1];
vt:=1;
for i:=1 to n do
if min>a[i] then
begin
min:=a[i];
vt:=i;
end;
writeln('So nho nhat la: ',min,' tai vi tri: ',vt);
write('Nhap k='); readln(k);
for i:=1 to n do
if i<>k then write(a[i]:4);
end;
readln;
end.
Bài 1:
uses crt;
var a,i:integer;
begin
clrscr;
a:=0;
for i:=1 to 10 do a:=a+i;
writeln(a);
readln;
end.
xin lỗi, mình không giúp được, bạn tự làm đi nhé:)
mình đang thắc mắc là không có giám thị hay sao mà bạn chụp được hẳn cái đề thi như này cũng chịu
#include <bits/stdc++.h>
using namespace std;
long long i,t;
int main()
{
t=1;
for (i=1; i<=50; i++) t=t*i;
cout<<t;
return 0;
}
CT này ko chạy đc nha bạn vì lũy thừa đến 21 (trong C++) đã ko tính đc r (bằng kiểu số nguyên)
bạn ơi câu a của bạn ý j ạ mk giải dc hết hỏi xíu thui
ý của câu a đầu là j ??
vieets chưng trình hay j á