viết chương trình : cho n là 10<n<100 tính tổng hai số nguyên dương
2 câu trả lời
uses crt;
var t,i,n:integer;
begin
t:=0;
begin
for i:=1 to 2 do
write('n=');
if (10<n) and (n<100) then
t:=t+n;
end;
writeln('tong = ',t);
readln;
end.
Var n,i, S : integer ;
Begin
S:= 0;
For i:= 11 to 99 do
S:= S + i;
Write(S);
Readln;
End.
Câu hỏi trong lớp
Xem thêm