Những câu hỏi liên quan
huynh chinh
Xem chi tiết
huynh chinh
5 tháng 1 2023 lúc 18:42

PASCAL giups mik

 

Bình luận (0)
Đinh Hoàng Nhất Quyên
Xem chi tiết
Nguyễn Lê Phước Thịnh
8 tháng 8 2023 lúc 20:02

uses crt;

var st:string;

d,i,n:integer;

begin

clrscr;

readln(n);

str(n,st);

d:=length(st);

for i:=d downto 1 do

write(st[i]);

readln;

end.

Bình luận (0)
Tram
Xem chi tiết
Nguyễn Lê Phước Thịnh
9 tháng 3 2023 lúc 14:50

#include <bits/stdc++.h>

using namespace std;

int n,kt,t;

int main()

{

cin>>n;

int t=0;

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

if (i%2==1) cout<<i<<" ";

cout<<endl;

for (int i=2; i<=n; i++)

{

kt=0;

for (int j=2; j*j<=i; j++)

if (i%j==0) kt=1;

if (kt==0) cout<<i<<" ";

}

return 0;

}

Bình luận (0)
luu tean khanh
Xem chi tiết
Phía sau một cô gái
27 tháng 2 2023 lúc 19:46

var A:

     array[1..n] of int64;

     i, n, count: integer;

begin

     write('Nhap so phan tu cua mang: ');

     readln(n);

     for i := 1 to n do

     begin

          write('Nhap phan tu thu ', i, ': ');

          readln(A[i]);

      end;

 

     count := 0;

     for i := 1 to n do

          if A[i] > 0 then

               count := count + 1;

     writeln('So luong cac so nguyen duong trong mang la: ', count); end.

Bình luận (0)
APOK FF
Xem chi tiết
nguyễn kim arica
Xem chi tiết
kjakdjsk
16 tháng 3 2016 lúc 16:16

45 hoc sinh mk chac 100000000 luon

Bình luận (0)
Hiếu Nguyễn
Xem chi tiết
Nghị Trương Thành
9 tháng 7 2022 lúc 21:40

#include <bits/stdc++.h>
#define ll long long
using namespace std;
ll i, j, n, a[1000005], dem = 0, m;
int main()
{
    ios::sync_with_stdio(0);
    cin.tie(0);
    cout.tie(0);
    cin >> n;
    for (i = 1; i <= n; i++)
    {
        cin >> a[i];
        if (a[i] % 3 == 0)
        {
            n--;
            i--;
        }
    }
    for (i = 1; i <= n; i++)
    {
        cout << a[i] << " ";
    }
    cout<<endl;
    for(i=1;i<=n;i++)
    {
        if(a[i]%5==0)
        {
            for(j=i;j<=n;j++)
            {
                a[j]=a[j+1];
            }
            n--;
            i--;
        }    
    }
    for(i=1;i<=n;i++)
    {
        cout<<a[i]<<" ";
    }
    return 0;
}

Bình luận (0)
ky do
Xem chi tiết
Nguyễn Lê Phước Thịnh
9 tháng 1 2021 lúc 17:15

uses crt;

var a,b:integer;

begin

clrscr;

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

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

if a>b then writeln('So lon nhat la: ',a)

else if a<b then writeln('So lon nhat la: ',b)

else writeln('Hai so bang nhau');

readln;

end.

Bình luận (0)
89654DAUUBUOIIIII956
Xem chi tiết
Phía sau một cô gái
22 tháng 7 2023 lúc 20:06

program tong_so_le;

var

     n, i, a_i, tong: integer;

begin

     writeln('Nhap vao so nguyen khong am n:');

     readln(n);

     while (n <= 0) or (n > 100) do

     begin

          writeln('So nguyen n phai thoa man 0 < n <= 100, vui long nhap lai:');

          readln(n);

     end;

     writeln('Nhap vao ', n, ' so nguyen a1, a2, ..., an:','<mỗi số nguyên nhập trên một hàng>');

     tong := 0; // Khởi tạo tổng bằng 0

     for i := 1 to n do

     begin

          readln(a_i);

          if i mod 2 = 1 then

               tong := tong + a_i; 

     end;

     writeln('Tong cac so tai vi tri le trong mang la: ', tong);

end.

Bình luận (0)