K
Khách

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.

9 tháng 5 2019

uses crt;
var i,n,k,m: longint;
a:array[1..100000] of longint;
begin
clrscr;
write('Nhap n: ');readln(n);
write('Nhap k: ');readln(k);
while n<>0 do
begin
m:=n mod 10;
n:=n div 10;
i:=i+1;
a[i]:=m;
end;
if k<i then write(a[k]) else write('Ko tim duoc');
readln
end.

19 tháng 3 2020
https://i.imgur.com/LRm4MuE.png

uses crt;
var n,k,d:longint;
st:string;
begin
clrscr;
write('n='); readln(n);
write('k='); readln(k);
if (n>=0) and (k>=0) then
begin
str(n,st);
d:=length(st);
if (k>d) or (k=0) then writeln('-1')
else writeln(st[k]);
end
else writeln('vui long nhap hai so tu nhien');
readln;
end.

24 tháng 4 2023

Ai giải giúp mik ạ

#include <bits/stdc++.h>

using namespace std;

long long m,n;

int main()

{

cin>>m>>n;

cout<<m*n;

return 0;

}

27 tháng 3 2021


program tinhtong;

uses crt;

var i, n, s: integer;

begin clrscr;

Write('N so tu nhien dau tien la: ');

readln(n);

s:=0;

i:=1;

while i<=n do begin

s:=s+i;

i:=i+1;

end;

writeln('Tong cac so la: ',s);

readln

end.

 

27 tháng 3 2021

giúp mình câu này luôn nhé

In ra màn hình trung bình của cấc số đã cho ở trên.
liên quan bài trên 

19 tháng 12 2021

#include <bits/stdc++.h>

using namespace std;

double a,b;

int main()

{

cin>>a>>b;

if (b==0) cout<<"Ko tinh duoc";

else 

{

cout<<a+b<<endl;

cout<<a-b<<endl;

cout<<a*b<<endl;

cout<<a/b;

}

return 0;

}

uses crt;

var i,n,k:integer;

a:array[1..100]of integer;

kt:boolean;

begin

clrscr;

readln(n);

for i:=1 to n do readln(a[i]);

for i:=1 to n do write(a[i]:4);

writeln;

readln(k);

kt:=false;

for i:=1 to n do 

  if a[i]=k then kt:=true;

if (kt=true) then write('Co k trong mang')

else writeln('Khong co k trong mang');

readln;

end.