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 tinhtong;
uses crt;
var n,i,s:integer;
begin
clrscr;
write('nhap n=');
readln(n);
while (n>100) do
begin
write('nhap lai n<100:');
readln(n);
end;
s:=0;
for i:=1 to n do s:=s+i;
write('tong vua tinh la:',s:3);
readln;
end.
Người mới vô có gì sai sót mong bỏ qua :))
Lệnh Writeln('5+20=','20+5'); in ra màn hình hai xâu ký tự '5+20' và '20+5' liền nhau: 5+20 = 20+5.
Còn lệnh Writeln('5+20=',20+5); in ra màn hình xâu ký tự '5+20' và tổng của 20+5 như sau: 5+20=25
Hai lệnh Writeln('100'); và Writeln(100); không tương đương với nhau vì một lệnh in ra màn hình xâu ký tự biểu diễn số 100 còn lệnh kia in ra màn hình số 100
uses crt;
var i:integer;
t:real;
begin
clrscr;
i:=1;
t:=0;
while i<=100 do
begin
t:=t+1/i;
inc(i);
end;
writeln(t:4:2);
readln;
end.
sua lai nhu sau:
a) if x=5 then a = b; sai vi sau if la 1 phep so sanh
b) if x>2 then a:=b; sai vi sau if x>2 phai bo dau ;
c) if x>5 then a:=b; m:=n; dung
d) if x>2 then a=b else m:=n; sai vi phai bo dau ; sau then a=b
a, sai vi sau if ko phai phep so sanh
b, sai. vi phai bo dau ; sau if x>2
c, dung
d, bo dau ; sau then a=b
lệnh M[5]:=100 tương đương lệnh nào sau đây?
a. M[3]+M[2]:=100
b. M[3]:=100
c M[3+2]:=100
d M[2]:=100
Chọn C