1/ Em hãy cho biết ý nghĩa của việc bảo vệ tự nhiên và khai thác thông minh tài nguyên thiên nhiên ? cho ví dụ ?. giúp mik với

program bai1;

var n,i:longint;

begin

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

for i:=1 to n do

if i mod 5=0 then writeln(i,' ');

readln

end.

d

Viết chương trình nhập vào hai số nguyên a,b. In ra màn hình BCNN của 2 số đó? cần giải nhanh . mik gần thi rồi

Program Sara_Trang;

Uses crt;

Var N,i,S:integer;

Begin

Clrscr;

Write('Nhap vao gia tri cua N :'); Readln(N);

S:=0;

For i:=1 to N do S:=S+i;

Writeln('Ket qua la :',S);

Readln

End.