program hinhtron;

var r:real;

const pi=3.14;

begin

clrscr;

Write('Nhapbankinh:');readln(r);

Writeln('Dientichhinhtronla:',pi*r*r);

readln

end.

Chọn D

hỏi giáo sư google là có hết

Mình biết nè

biet sao ko tra loi hay ko viet duoc vi dai qua

int BCNN(int a, int b)

{

int result = UCLN(a, b);

return a * b / result;

}

int main()

{

int a, b; cout << "a = ";

cin >> a;

cout << "b = ";

cin >> b;

int result = UCLN(a, b);

cout << "UCLN : "<<result; cout << "\n";

result = BCNN(a, b);

cout << "BCNN : " << result << endl;

system("pause");

}

Biết viết mỗi C++, Pascal thì miss gần hết :(

uses crt;

var a,b,bcnn,i:longint;

begin

clrscr;

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

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

bcnn:=a*b;

for i:=a*b-1 downto 1 do 

  if (i mod a=0) and (i mod b=0) then 

   begin

if bcnn>i then bcnn:=i;

end;

writeln('Boi chung nho nhat la: ',bcnn);

readln;

end.

Câu 1:mã chương trình:

var i,n,d,j:longint;
begin
        readln(n);
        for i:=2 to n do
           begin
                d:=0;
                for j:=2 to trunc(sqrt(i)) do
                        if i mod j =0 then d:=d+1;;
                if d=0 then writeln(i);
           end;
        readln;
end.

Câu 2: Mã chương trình:

var i,n,d,t:longint;
begin
        readln(n);
        if n<2 then write('ko phai snt')else
         begin
         t:=0;
             while n>0 do
                 begin
                        d:=0;
                        for i:=2 to trunc(sqrt(n)) do
                            if n mod i=0 then d:=d+1;
                        if d=0 then n:=n div 10 else begin
                                                        t:=1;
                                                        break; {thoat khoi lenh}
                                                end;
                 end;
             if t=1 then write('ko phai snt') else write('la snt');
         end;
        readln;
end.

Câu 1: 

Chương trình máy tính là một tập hợp các hướng dẫn cho việc thực hiện nhiệm vụ của một máy tính.

https://lazi.vn/edu/exercise/viet-doan-van-nghi-luan-khoang-12-cau-trinh-bay-suy-nghi-cua-em-ve-suc-lan-toa-cua-nhung-dieu

H/t

Chọn D