Lập trình đơn giản

HP

Bài tập 1: Viết chứng trình tính tổng 3 số nguyên được nhập từ bàn phím

Bài tập 2: Viết chương trình nhập vào một số và in ra màn hình kết quả số chẵn hay số lẻ

Bài tập 3: Mô tả thuật toán tính tổng của 100 số tự nhiên đầu tiên

DN
21 tháng 11 2017 lúc 20:31

program bai1;

uses crt;

var a,b,c,s: real;

begin

clrscr;

write('nhap so thu nhat ='); readln(a);

write('nhap so thu hai ='); readln(b);

write('nhap so thu ba ='); readln(c);

s:=a+b+c;

writeln('tong ba so a,b,c =',s:4:2);

readln;

end.

Bình luận (0)
DN
21 tháng 11 2017 lúc 20:33

program bai1;

uses crt;

var n: integer;

begin

clrscr;

write('nhap so n ='); readln(n);

if n mod 2 = 0 then

writeln('la so chan ') else

writeln('la so le ');

readln;

end.

Bình luận (0)
DN
21 tháng 11 2017 lúc 20:39

bài 3 :

B1: S <- 0 ; i<-0;

B2: i<- i+1;

B3: Nếu i <= 100 thì S:=S+i; Và quay lại B2.TRong trường hợp ngược lại thông bào kết quả rồi kết thúc thuật toán.

Bình luận (1)

Các câu hỏi tương tự
NN
Xem chi tiết
MD
Xem chi tiết
H24
Xem chi tiết
HQ
Xem chi tiết
H24
Xem chi tiết
NA
Xem chi tiết
KH
Xem chi tiết
H24
Xem chi tiết
NT
Xem chi tiết