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.

3 tháng 9 2016

ket qua bang 48 

Neu ma sai thi xin loi :)

3 tháng 9 2016

ket qua bang 48

Minhkhong biet la dung hay sai

neu ma sai thi thong cam

Bài 1:

uses crt;

var n,i,s:integer;

begin

clrscr;

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

s:=0;

for i:=1 to n do 

 if i mod 6=0 then s:=s+i;

writeln(s);

readln;

end.

Bài 2: 

uses crt;

var a,b,c,ucln,i:integer;

begin

clrscr;

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

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

write('c='); readln(c);

while a<>b do 

  begin

if a>b then a:=a-b

else b:=b-a;

end;

ucln:=a;

while ucln<>c do 

 begin

if ucln>c then ucln:=ucln-c

else c:=c-ucln;

end;

writeln(ucln);

readln;

end.

3 tháng 9 2021

Hiệu 2 số là số lớn nhất có 2 chữ số chia hết cho 9 là: 99

Tổng 2 số là số lớn nhất có 3 chữ số chia hết cho 9 là: 999

Số lớn là: \(\left(999+99\right):2=549\)

4 tháng 9 2021

Ta có tổng 2 số là số lớn nhất có hai chữ số là 99.

Tổng số phần bằng nhau là 2+1=3 (phần)

Giá trị 1 phần là 99:3=33

Số thứ nhất là 33 x 2=66

Số thứ hai là 99−66=33