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.
Tham khảo:
-lệnh dùng để xóa màn hình làm việc:
Uses Crt ; { khai báo thư viện hàm }
Clrscr; { lệnh xóa màn hình kết quả }
- hai lệnh này dùng song song vs nhau nha.
VD:
Program vi_du;
uses crt;
var i,n: integer;
s: real;
begin
clrscr;
write('nhap so n ='); readln(n);
s:=0;
for i:= 1 to n do
s:=s+i;
writeln(s :4:2);
readln;
end.
#include <bits/stdc++.h>
using namespace std;
long long m,n;
int main()
{
cin>>m>>n;
if (m%n==0) cout<<m/n;
else if (n%m==0) cout<<n/m;
else cout<<m+n;
return 0;
}
Mình viết phần thân thôi nha
n khai báo là interger
n:=0;
While n<>100 do
Begin
Write(n,' ');
inc(n);
end;
PROGRAM LOSER;
USES crt;
VAR
i:Bytbe;
BEGIN
clrssr ();
i:=1;
while i <100 do
BEGIN
write('',i);
i:=i+1;
End;
Readln;
END.
( uy tín chạy được em nha)
Em cần sử dụng thao tác nháy đúp chuột trong những tình huống nào sau đây?
A. Khởi động một phần mềm trên màn hình nền.
B. Chọn lệnh New Folder trên dải lệnh Home của cửa sổ làm việc với tệp và thư mục để tạo thư mục mới.
C. Mở một thư mục trên máy tính.
Câu 1:
Var a:Integer;
Begin
Writeln('Nhap a: '); Readln(a);
If (a mod 2)=0 then writeln(a,'chia het cho 2') else (a,' khong chia het cho 2');
Readln;
End.
Câu 2:
Var S,a,b,c:Integer;
Begin
Writeln('Nhap a: '); readln(a);
Writeln('Nhap b: '); readln(b);
Writeln('Nhap c: '); readln(c);
S:=a+b+c;
Writeln('Tong cua ba so la: ',S);
Readln;
End.
Câu 3:
Var a,b,c:Integer;
Begin
Writeln('Nhap a: '); Readln(a);
Writeln('Nhap b: '); readln(b);
Writeln('Nhap c: '); readln(c);
If (a mod 2)=0 then writeln(a,' la so chan') else (a,' la so le');
If (b mod 2)=0 then writeln(b,' la so chan') else (b,' la so le');
If (c mod 2)=0 then writeln(c,' la so chan') else (c,' la so le');
Readln;
End.
1)Program songuyenduong;
Uses crt;
Var y: integer;
Begin
clrscr;
writeln('nhap so y'); readln(y);
if (y mode 5)=0 then writeln(y,'chia het cho 5')else write(y,' khong chia het cho 5');
readln;
End.
#inclue <bits/stdc++.h>
using namespace std;
double a;
int main()
{
cin>>a;
if (a<=0) cout<<"khong phai";
else cout<<fixed<<setprecision(2)<<a*a;
return 0;
}
B
Giúp mình với