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.

5 tháng 12 2021

var a,b:longint;
begin
write('nhap a:');readln(a);
write('nhap b:');readln(b);
 cau a) if a>b then write(a);
cau b) if a=b then write('hai so bang nhau') else write('hai so ko bang nhau');
cau c) if a mod b=1 then write('a le') else write('a chan');
readln
end.

mỗi câu a,b,c thì readln rồi end nhé

#include <bits/stdc++.h>

using namespace std;

long long n;

int main()

{

cin>>n;

if (n%9==0) cout<<"n la boi cua 9";

else cout<<"n khong la boi cua 9";

return 0;

}

uses crt;

var a,b:integer;

begin

clrscr;

readln(a,b);

if (a>0) and (b>0) then writeln(a*b)

else writeln('Nhap lai');

readln;

end.

16 tháng 1 2021

Program bai_tap;

Uses crt;

Var i:integer;

Begin

clrscr;

For i:=9 to 50 writeln(i);

readln;

End.

16 tháng 1 2021

Program bai_tap;

Uses crt;

Var i:integer;

Begin

clrscr;

For i:=9 to 50 writeln(i);

readln;

End.

7 tháng 3 2023

Program HOC24;

var r,s: real;

begin

write('Nhap ban kinh: '); readln(r);

writeln('Dien tich la: ',r*r*3.14:6:2);

write('Chu vi la: ',r*2*3.14:6:2);

readln

end.

uses crt;

var a,b:integer;

begin

clrscr;

readln(a,b);

writeln(a*b);

if (a>0) then writeln('a la so nguyen duong')

else writeln('a la so nguyen am');

readln;

end.

22 tháng 12 2021

#include <bits/stdc++.h>

using namespace std;

long long a,b,t;

int main()

{

cin>>a>>b>>t;

if (t==a+b) cout<<"chuc mung ban da tinh dung";

else cout<<"rat tiec ban da lam sai";

return 0;

}