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.
program bai3;
uses crt;
begin
clrscr;
writeln('rat vui duoc lam quen voi cac ban!');
writeln('day la bai kiem tra hoc ki 1 mon tin hoc lop 8!');
writeln('chuong trinh turbo pascal rat la hay!');
readln;
end.
program bai1;
uses crt;
begin
clrscr;
writeln('=75 mod 6');
writeln('=99 div 5');
readln;
end.
program bai1;
uses crt;
Begin
writeln ('Chao ban');
writeln('Rat vui duoc lam quen voi ban');
writeln('Rat han hanh');
Readln
End.
#include <bits/stdc++.h>
using namespace std;
long long a;
int main()
{
cin>>a;
if (a%2==0) cout<<a<<" la so chan";
else cout<<a<<" la so le";
return 0;
}
a) read(canang)
b) write(x + y + z)
c) write("chuc cac ban thi tot")
program;
uses crt;
var a:longint;
begin
clrscr;
write('nhap a:');readln(a);
if(a>=0)and(a<=50)then write('n nam trong khoang tu 1 den 50')
else write('n khong nam trong khoang tu 1 den 50');
readln;
#include <bits/stdc++.h>
using namespace std;
int a;
int main()
{
cin>>a;
if ((a>=1) and (a<=50)) cout<<"YES";
else cout<<"NO";
return 0;
}
uses crt;
begin
clrscr;
writeln('rat vui khi duoc lam quen voi cac ban');
writeln('day la bai kiem tra hoc ki 1 mon tin hoc lop 8');
writeln('chuong trinh Turbo Pascal rat la hay');
readln;
end.
chạy thử đi hay lắm
là lệnh xoá màn hình để khi chạy ct sẽ gọn hơn. Bạn thử chạy ct khi có câu lệnh clrscr và khi k có câu lênh clrscr thử xem
Cho mik hỏi cái clrscr là gì vậy
Uk thanks bạn
Trong sách học mik thấy mấy cái Writeln viết hoa mà, không viết hoa có sai k bn?
textcolor(...) là gì thế bạn ????
Program Love; (Tùy bn đặt nha)
Uses Crt;
Begin
Clrscr;
Writeln('rat vui duoc lam quen voi cac ban');
Writeln('day la bai kiem tra hoc ki 1 mon tin hoc lop 8');
Writeln('chuong trinh Turbo Pascal rat la hay');
Readln; ( dấu chấm phẩy có học ko cũng đc nha)
End.
Học tốt nha ông zà