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.

10 tháng 1 2021

Me ko biết.

10 tháng 1 2021

z trl lm j

5 tháng 8 2021

program sosanh;

uses crt;

var a,b,c : real;

begin

      readln(a,b);

      c:= a-b;

      if c>0 then writeln(' a lon hon b');

      if c<0 then writeln('a nho hon b');

      if c=0 then writeln('a bang b');

      readln;

end.

Dốt tin nên chỉ làm dc vậy, đúng thì 5 sao nhé

28 tháng 12 2021

B

 

21 tháng 2 2022
A nhé chúc bn học dốt
4 tháng 6 2021

program tim_tuoi;

uses crt;

var i,j,ngaysinh,tuoi, uoctuoi,k:integer;

begin

    clrscr;

    for i:=1 to 9 do

    for j:=0 to 9 do

    for k:=0 to 9 do

    begin

    uoctuoi:=sqr(i)+sqr(j)+sqr(k);

    tuoi:=i*100+j*10+k;for ngaysinh:=1 to 31 do

    if tuoi =uoctuoi+ngaysinh then write('tuoi cua cu la: ',tuoi);

    end;

    readln;

end.

16 tháng 1 2024

con cach de hon khong