a) Máy tính sẽ thực hiện 6 vòng lặp
t=0; j=30
b)
uses crt;
var j,t:integer;
begin
t:=105;
j:=0;
while t>=20 do
begin
j:=j+5;
t:=t-j;
end;
writeln(t);
writeln(j);
readln;
end.
a) Máy tính sẽ thực hiện 6 vòng lặp
t=0; j=30
b)
uses crt;
var j,t:integer;
begin
t:=105;
j:=0;
while t>=20 do
begin
j:=j+5;
t:=t-j;
end;
writeln(t);
writeln(j);
readln;
end.
Các bạn ơi, có ai biết một nhóm về Tin Học nào đó trên FB hoặc một diễn đàn Tin Học nào cho mình xin link với. Hiện tại mình đang có một thắc mắc liên quan đến Tin Học mà e rằng sẽ không hỏi được trên HOC24 nên mình cần sự trợ giúp gấp của những người khác trên đó. Cảm ơn các bạn nhiềuuu !!!
có ai biết cách khắc phục lỗi này ko ạ
viết chương trình tính giá trị biểu thức c= (a + b)/2
làm ơn nhanh lên cần gấp
Hãy viết chương trình nhập ba số dương a, b và c từ bàn phím, kiểm tra và in kết quả ra màn hình kiểm tra ba số đó có thể là độ dài ba cạnh của một tam giác hay không?
Ai biết giúp với !!! Cần gấp gấp gấp lắm
Lớp mình ít khi được thầy cô giáo cho học tin nên không biết gì về tin học mong các bạn giúp mình làm bài này
Có ai giúp mình đc ko.Mình đang học free pascal trên máy laptop.Nhưng mà mình ko dịch và chạy chương đc.
Có bạn hay anh chị nào biết chỉ dùm mình đc ko ?
Cần một nhân tài giúp đỡ :v Đến đó rồi làm gì nữa ạ
câu 1: Viết chương trình in ra các số chẵn nhỏ hơn hoặc bằng 100.
câu 2: Viết chương trình in ra các số lẻ nhỏ hơn hoặc bằng 100.
Giúp mình với ạ. Mình đang cần gấp!!!!
hãy chạy chương trình từng bước và cho biết kết quả từng biến
J:=30
for i:=1 to 5 do J:=i-5;
mình cần gấp lắm,cảm ơn trước ạ