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.
Program tính_chia;
Uses crt;
Var i, n, s, a: integer;
Begin
Write('Nhap so n: '); readln(n);
s:=1;
For i:=1 to n do s:=s*i;
a:=0;
For i:=1 to n do a:=a+i;
Writeln('Ket qua phep tinh chia bang: ', s/a :10:2);
readln;
End.
2/ program bt;
var N,i:integer;
begin
write('nhap so N'); readln(N);
writeln;
writeln (' bang nhan ', N);
writeln;
for i:=1 to 10 do writeln(N,'x',1:2,'= ', N*1;3); end
readln
end.
Mik chỉ bít làm bài 2 thôi!
program loc_so_le;
uses crt;
var N,y: longint;
begin
Writeln('Nhap so N '); Readln(N);
for y:=1 to N do if (y mod 2) <>0 then Writeln (y,' la so le');
Readln;
end.
Uses Crt;
Var A : Array [1..100] Of Integer ;
i , j , n , T : Integer ;
BEGIN
Clrscr ;
Write(' Do dai cua day so N = ') ; Readln (N) ;
Writeln (' Nhap day so : ') ;
For i := 1 To N Do
Begin
Write('A[', i ,'] = ') ; Readln ( A ) ;
End ;
i := 1 ;
While (i <= n-1) Do
Begin
j := i+1;
While j<=n do
Begin
If A[j] < A then
Begin
T := A[j];
A[j ] := A;
A := T ;
End ;
j := j + 1;
End ;
i := i + 1;
End ;
Writeln(' Day sau khi sap xep : ') ;
For i := 1 To N Do Write(A : 4) ;
Readln ;
END .
uses crt;
var n,i,max,min:integer;
s:real;
a:array[1..100] of integer;
begin
clrscr;
write('nhap n:');readln(n);
for i:=1 to n do
begin
write('a[',i,']=');readln(a[i]);
end;
max:=a[1]; min:=a[1];
for i:=2 to n do
begin
if a[i]>max then max:=a[i]
if a[i]<min then min:=a[i];
end;
s:=(max+min)/2;
wrrite('so lon nhat la:',max);
write('so nho nhat la:',min);
write(' trung binh số lớn nhất và số nhỏ nhất là:',s);
readln;
end.
giúp m đó BFF
#include <bits/stdc++.h>
using namespace std;
long long x;
//chuongtrinhcon
bool ktnt(long long n)
{
for (int i=2; i*i<=n; i++)
if (n%i==0) return(false);
return(true);
}
//chuongtrinhcon
bool ktso(long long n)
{
int a=n%10;
int b=n/10; b=b%10;
int c=n/100; c=c%10;
int d=n/1000; d=d%10;
if (a+b==c+d) return(true);
else return(false);
}
//chuongtrinhchinh
int main()
{
for (x=1000; x<=9999; x++)
if ((ktnt(x)==true) and (ktso(x)==true)) cout<<x<<" ";
return 0;
}