giải giùm em bài này với ạ, 6h em phải nộp
viết màn hình in ra các dòng sau
xin chao tat ca cac ban
toi ten la, hoc sinh lop
1) 3*8+4*9
2)2*x+3*y+8*z=
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.
begin
write ('TRUONG THCS ...');
write ('CHAO CAC BAN HOC SINH LOP 8');
readln ;
end.
program XinChao;
uses crt;
(* Day la chuong trinh chinh *)
Begin
writeln('Xin chao cac ban!');
readkey;
End.
Em cũng làm được cái này nhưng hai câu nó không xuống dòng mà nó cứ ra liên tiếp. Giúp e với
program 06;
Uses crt;
Var
T:real
i;n:integer;
Begin
clrscr;
write('n=1');Readln(n);
T:=06
for i:=1 to n do
T:=\frac{1}{1}.2+\frac{1}{2}.5+\frac{1}{3}.8+\frac{1}{4}.11
write('T=06'; T);
readln;
end.
uses crt;
begin
writeln('Xin chao cac ban');
writeln('Moi ban den voi Pascal');
readln;
end.
a ) Goi 2 so tu nhien lien tiep la n , n + 1 va d la UC(n,n+1 )
theo de ta co :
n chia het cho d
n + 1 chia het cho d
Tu do ta co :
n + 1 - n chia het cho d => 1 chia het cho d
d \(\in\)U( 1 ) = { 1 }
=> UC(n , n + 1) = { 1 }
Vay .....