hãy viết chương trình tìm số n nhỏ nhất sao cho tổng s=2+4+6+...+n và s>2018. hãy in ra s và n?
giúp mk vs cần gấp lắm luôn!!
em hãy cho biết thuật toán máy tính thực hiện bn vòng lặp? kết thúc của S bằng bn ? viết chương trình bằng pascal để mô tả thuật toán
B1:S<-20,N<-1,
B2:nếu S<HOẶC =6 CHUYỂN B4,
B3 N<-N+1, S<-S-N VÀ QUAY LẠI B2,
B4 THÔNG BÁO S VÀ KẾT THÚC THUẬT TOÁN
mn chỉ em với e cần gấp ạ
cho số tự nhiên N(1 N<10^6). Tính tổng sau : S= 1-2+3-4+5-6...+N
viết chương trình ra giúp vs
Tính tổng của S= 1+2+3+..+n sao cho tổng S nhỏ nhất lớn hơn 500
Vơi n là ô nguyên đc nhập từ bàn phim
xl phim mik hư
Hãy tìm lỗi đoạn chương trình sau và sửa lại cho đúng vào cột bên cạnh: Program Tong__nghich__dao; Var n, i: real S: Integer; Begin Write (‘Nhap n= ’); readln(n); S:=0; For i:=1 to n do S=S+1/i; Write(‘Tong can tim la: ’, ‘S:6:2’); Readln End.
Cho thuật toán sau đây
B1: S<- 0, n <- 3
B2: nếu S>= 6 chuyển b4
B3 s<- s +n và quay lại b2
B4 thông báo s và kết thúc thuật toán
Viết chương trình bằng pascal
Cho thuật toán sau đây
B1: S<- 0, n <- 3
B2: nếu S>= 6 chuyển b4
B3 s<- s +n và quay lại b2
B4 thông báo s và kết thúc thuật toán
Viết chương trình bằng pascal
viet chung trinh pascal s=1+2...+n, s sao cho s>100 hoi khi do s=?
a/. Em hãy cho biết thuật toán máy tính sẽ thực hiện bao nhiêu vòng lặp? Kết thúc giá trị của S bằng bao nhiêu?
b/. Viết chương trình bằng Pascal để mô tả thuật toán đó.
B1: S ! 20, n! 1;
B2: Nếu S ≥ 5, chuyển B4.
B3: n ! N + 1, S ! S - n và quay lại B2.
B4: Thông báo S và kết thúc thuật toán.