câu 1:tính tổng số lẻ nhỏ hơn hoặc bằng N.N nhập từ bàn phím (dùng thêm if và mod). câu 2:tính tổng S=1+1/2+1/3+...+1/100 (gợi ý dùng while do và for do).

106052814799548

2 năm trước

Loga Sinh Học lớp 12

0 lượt thích 28 xem

1 trả lời

Thích Trả lời

ctvloga118

Program cau1;

Uses crt;

Var s,n,i: integer;

Begin

Clrscr;

Write('nhap n = '); readln(n);

For i:=1 to n do if i mod 2 = 1 then write s:=s+i;

Write('tong cac so le nho hon',n,' la ', s);

Readln;

End.

Program cau2;

Uses crt;

Var i,S: integer;

Begin

Clrscr;

S:=0;

i:=1;

While i<=100 do

Begin

S:=S+1/i;

i:=i+1;

End;

Writeln('tong so can tim la ', t :0:2 );

Readln;

End.

Vote (0) Phản hồi (0) 2 năm trước

manh64

Câu 1:- Cho biến i chạy từ 1 đến n.

- Nếu i chẵn ( i chia 2 dư 0) thì in ra số
mik chỉ bt làm câu 1 thôi

Vote (0) Phản hồi (0) 2 năm trước

Các câu hỏi liên quan

Giúp đỡ e ạ Em cần gấp lắm Câu 2, 3,4 ạ

Giải hộ e Em cần gấp Cắm mơn ạ

Cho hình chữ nhật ABCD. kẻ AH vuông góc BD( H thuộc BD). Vẽ hình cho mik luôn nhé a) CM: tam giác HDA đồng dạng vs tam giác ADB b) Cm: AD^2= DB* HD Mik cần gấp cho 2 ai nhanh nhất vote 5 và câu trả lời hay nhất KO copy của nhau nhé

vì sao không khí có độ ẩm? giúp mik lần 2

một người đi xe đạp từ A đến B với vận tốc 15km/h. Lúc quay về người đó chỉ đi với vận tốc 12km/h, nên thời gian về nhiều hơn thời gian đi là 45 phút . Tính độ dài quãng đường AB.

phòng tránh sự nở nhiệt như thế nào?

Cot (2pi -x) bằng gì v mn, giải chiết luôn nha

Trình bày đặc điểm của tân liễn tạoo

Câu1: Vi sinh vật có lợi hay có hại . Vì sao? Câu2: Virut có lợi hay có hại . Vì sao? Câu3: Vì sao ngày xưa nhiều người bị bệnh phong , bây giờ thì không Câu4: Xà phòng có phải chất diệt khuẩn không? Câu 5 : Tại sao không nên dùng cồn 90° mà lại dùng cồn 70°

đặc điểm sinh sản và hô hấp của thằn lằn có gì khác so với ếch đồng

Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến