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 11 2021

thi ban co nho lai mat khau la j , ban nho xem ban co doi mat khau ko

9 tháng 11 2021

mik gõ r mà mik chắc chắc 100% mật khẩu đó đúng . À mà mik lấy nick em mik vào trang của mik thì nó để là Nick đã bị đổi chủ! !

19 tháng 4 2020

Trúc chó : Đúng nhé.

18 tháng 4 2020

Bài 2:

Program hotrotinhoc;

var i: byte;

begin

write('5 so tu nhien dau tien la : ');

for i:=0 to 4 do write(i,' ');

readln

end.

Bài 3:

Program hotrotinhoc;

var n,i: integer;

s: real;

begin

write('N='); readln(n);

i:=0;

while i<n do

begin

inc(i);

s:=s+1/i;

end;

write('S=',s:1:2);

readln

end.

16 tháng 12 2018

uses crt;

var

a,b: integer;

begin

clrscr;

write('Nhap so thu nhat: ');readln(a);

write('Nhap so thu hai: ');readln(b);

writeln('Tong ',a,' va ',b,' la: ',a+b);

readln

end.

21 tháng 12 2018

Câu 1:

Var

cv,s,a:integer;

begin

write('nhap vao canh hinh vuong:');readln(a);

s:=a*a;

cv:=a*4;

Writeln('chu vi hinh vuong la:',cv);

WRiteln('dien tich hinh vuong la:',s);

readln

end.

13 tháng 9 2017

https://www.youtube.com/watch?v=NUzLKQv9Jd8

bạn vào link này để xem hướng dẫn đi

8 tháng 10 2017

https://www.youtube.com/watch?v=NUzLKQv9Jd8

Video này có hướng dẫn nè bn...vào xem lam như họ là đc...hầu mk cũng bị cái này rồi

9 tháng 10 2017

Uk

Mk cảm ơn bạn nha

Câu 1:

uses crt;

var n,i,kt:integer;

begin

clrscr;

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

if n<2 then writeln(n,' khong la so nguyen to')

else begin

kt:=0;

for i:=2 to n-1 do 

  if n mod i=0 then kt:=1;

if kt=0 then writeln(n,' la so nguyen to')

else writeln(n,' khong la so nguyen to');

end;

readln;

end.

Câu 2: 

uses crt;

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

i,n,max,min: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:=1 to n do 

  begin

if max<a[i] then max:=a[i];

if min>a[i] then min:=a[i];

end;

writeln('So lon nhat la: ',max);

writeln('So nho nhat la: ',min);

readln;

end.

Hoc24 vừa cập nhật cứ sao sao ấy, ko cập nhật ảnh bìa với ảnh đại diện được :<

11 tháng 12 2020

Ừ!Nó cứ không quen với cả khó dùng ý

21 tháng 11 2021

...

21 tháng 11 2021

Đúng đó bạn

20 tháng 8 2021

khổ thân