HOC24
Lớp học
Môn học
Chủ đề / Chương
Bài học
thi cau sd cau lenh for..do:
vd : for i:=1 to n do
writeln(i); hoac writeln('lan lap thu',i);
a=3, b=1
B
var n:integer;
begin
readln(n);
writeln(abs(n));
writeln(sqr(n));
writeln(n mod 3);
end.
mình làm tắt nhé. chúc bạn học tốt:>
readln(a,b);
cv:=(a+b)*2;
s:=a*b;
writeln(a,b);
ở trong sbt tin 8 chỗ lệnh lặp biết trước ấy bạn:)))
var N:integer;
readln(N);
if N mod 3=0 then write('Chia het') else write('k chia het').
Đại loại tke:)))