giải

program hcn;

uses crt;

var d,r,dt:longint;

cv:real;

begin

write('nhap chieu dai va chieu rong cua hcn:');

readln(d,r);

cv:=(d+r)*2;

dt:=d*r;

writeln(' chu vi hcn do la:',cv);

writeln(' dien tich hcn do la:',dt);

readln

end.

ok

cảm ơn cậu

tr ơi đừng có vt chương trình nx

tin học lớp 8 là pascal thì vt chương trình chứ sao nữa bạn xD

giải

uses crt;

var n,i,x:longint;

begin

write(' nhap so n: ');readln(n);

x:=0;

for i:=2 to n-1 do

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

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

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

readln

end.

thôi đau đầu lắm đọc mấy cái kia ko hỉu đề bài thì ai giải đc

đau đầu quá!

dễ mà, chỉ là t ko làm dc k=1 tỷ thôi

010010110101011010101001001001011010111101000111001010101101010010101011011101001011010101000100101001011010101101010100100100101101011110100011100101010110101001010101101110100101101010100010010100101101010110101010010010010110101111010001110010101011010100101010110111010010110101010001001010010110101011010101001001001011010111101000111001010101101010010101011011101001011010101000100101001011010101101010100100100101101011110100011100101010110101001010101101110100101101010100010010100101101010110101010010010010110101111010001110010101011010100101010110111010010110101010001001010010110101011010101001001001011010111101000111001010101101010010101011011101001011010101000100101001011010101101010100100100101101011110100011100101010110101001010101101110100101101010100010010100101101010110101010010010010110101111010001110010101011010100101010110111010010110101010001001010010110101011010101001001001011010111101000111001010101101010010101011011101001011010101000100101001011010101101010100100100101101011110100011100101010110101001010101101110100101101010100010010100101101010110101010010010010110101111010001110010101011010100101010110111010010110101010001001010010110101011010101001001001011010111101000111001010101101010010101011011101001011010101000100101001011010101101010100100100101101011110100011100101010110101001010101101110100101101010100010010100101101010110101010010010010110101111010001110010101011010100101010110111010010110101010001001010010110101011010101001001001011010111101000111001010101101010010101011011101001011010101000100101001011010101101010100100100101101011110100011100101010110101001010101101110100101101010100010010100101101010110101010010010010110101111010001110010101011010100101010110111010010110101010001001

pascal bạn oi

ko hỉu

Ko hiểu nốt

hello

chào bạn