Viết chương trình in ra màn hình dòng chữ:
"Hello
Toi la Turbo Pascal"
*Cần khai báo kiểu dữ liệu*
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.
Những câu hỏi liên quan
7 tháng 11 2021
uses crt;
var a,b:integer;
begin
clrscr;
readln(a,b);
writeln(a+b);
readln;
end.
7 tháng 11 2021
uses crt;
var a,b:int64;
begin
clrscr;
readln(a,b);
writeln(a+b);
readln;
end.
11 tháng 12 2020
a) var a:real;
b:string;
a:=20.5;
readln(b);
b) var x:string;
y:integer;
x:='Ha Noi';
readln(y);
23 tháng 3 2022
1 là bn sửa hình nền
2 là mk gọi admin hoặc giáo viên khác khoá nick bn
8 tháng 3 2022
uses crt;
const fi='dulieu.dat';
var f1:text;
a,b,p,s:array[1..100]of real;
i,n:integer;
begin
clrscr;
assign(f1,fi); reset(f1);
n:=0;
while not eof(f1) do
begin
n:=n+1;
readln(a[n],b[n]);
end;
for i:=1 to n do
begin
p[i]:=(a[i]+b[i])/2;
s[i]:=a[i]*b[i];
end;
for i:=1 to n do
writeln(p[i]:4:2,' ',s[i]:4:2);
close(f1);
readln;
end.
20 tháng 10 2021
uses crt;
begin
writeln('Xin chao cac ban');
writeln('Moi ban den voi Pascal');
readln;
end.
program vietchuongtrinh;
uses crt;
begin
clrscr;
writeln('Hello');
writeln('"Toi la Turbo Pascal"');
readln;
end.
phải khai báo kiểu dữ liệu nữa kêr ._.