Khi thực hiện đoạn chương trình sau:
n:=1; T:=50; while n<10 do Begin n:=n+2;T:=T-n
end;
hãy cho biết máy tính sẽ thực hiện bao nhiều vòng lặp và giá trị của T và n là bao nhiêu? help mk với ạ
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.
Bạn là coan trai à ?
Nếu là trai thì mình nghĩ bạn rất đẹp zai. Nổi bật trên khuôn mặt là những cục mụn dễ thương . mặc dù vẫn đệp zai
Bài 1:program sothuc;
uses crt;
var a:array[1..10] of real;s,i,j:real;
begin
s:=0;
for i:=1 to 10 do begin writeln('A[',i,']=');readln(a[i]); end;
for i:=1 to 10 do if a[i]<0 then
for j:=1 to 10 do
begin a[j]:=sqr(a[i]); s:=s+a[j]; end;
writeln('tong binh phuong cac so am la: ',s:2:2); readln;
end. (Khi nào mình kiểm tra chạy lại trên phần mềm rồi sửa lại nếu sai nhé)
Bài 2:
program soduong;
uses crt;
var a:array[1..100] of integer;s,i,n:integer;
begin
clrscr;
writeln('nhap do dai cua day');readln(n);
for i:=1 to n do begin
writeln('a[',i,']=');readln(a[i]);
if a[i] mod 2 = 0 then s:=s+a[i] end;
writeln('tong so duong trong day la',s:2:0);readln
end.
Bài 3: các số dương mà là số lẻ là sao thế bạn????
ko nhưng cậu họ mik nghiện blackpink tới mức: nền máy tính, đt,bàn phím, sổ tay,... đều là blackpink ! ^-^
Máy tính sẽ thực hiện 5 vòng lặp
Gtri của T sau 5 vòng lặp là 15
Gtri của n là 11, vì n=11 => n<10(KTMĐK) nên chương trình ngừng.