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.
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.
Em cũng làm được cái này nhưng hai câu nó không xuống dòng mà nó cứ ra liên tiếp. Giúp e với
begin
write ('TRUONG THCS ...');
write ('CHAO CAC BAN HOC SINH LOP 8');
readln ;
end.
program vd1;
uses crt;
begin
clrscr;
writeln('chao cac ban toi la minh');
readln;
end.
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.
#include <bits/stdc++.h>
using namespace std;
long double a,b;
int main()
{
cin>>a>>b;
cout<<fixed<<setprecision(2)<<a*b;
return 0;
}
begin
write('xin chao cac ban');
write('toi la free pascal');
readln;
end.
program bai1;
uses crt;
Begin
writeln ('Chao ban');
writeln('Rat vui duoc lam quen voi ban');
writeln('Rat han hanh');
Readln
End.