Bài tập 4 trang 33 SGK Tin học 8

cho a=9,b=8.tim gia tri cua S sau moi câu lệnh dưới đây,với ban đầu giá trị của S=0

A.If (a+b) mod 2=0 then S:=a*b;

B.If (a>=b) or (a>9) then S:=b else S:=a;

thanks

Hãy liệt kê các lỗi, điền từ khuyết, sắp xếp lại các câu lệnh trong chương trình sau:

1. Program Tinh tien;

2. Uses crt

3. ....... soluong,dongia,Tienthanhtoan:=integer;

4. ....... Phi=1000;

5. ..........

6. Clrscr;

7. write('nhap so luong:');readln(soluong);

8. write('nhap don gia:');readln(dongia);

9. writeln('So tien quy khach phai thanh toan la:',Tienthanhtoan);

10. Tienthanhtoan = soluong*dongia+phi;

11. ............

12. End.

giúp mik vs các bạn!

Hãy liệt kê các lỗi, điền từ khuyết, sắp xếp lại các câu lệnh trong chương trình sau:

1. Program Bai11;

2. ........ crt;

3. ........ a,b,H:integer;

4. ........ c=12;

5.Begin

6. Clrscr;

7. write('nhap a='); Readln(a);

8. write('nhap b='); ...........(b)

9. H:=a*a+b*b+c;

10. Readln;

11. Writeln('H=',H);

12. .......

số biến có thể khai tối đa trong chương trình là bao nhiêu

writeln(thongbao, thanhtien:10:2);

cho mình hỏi :10:2 trong câu lệnh trên có nghĩa là gì? (Pascal 8)

Viết chương trình nhập vào 3 số nguyên x, y, z. tính trung bình cộng của 3 số trên và in kết quả ra màn hình.

help me, please!

Viết chương trình tính tích của 2 số nguyên được nhập từ bàn phím

Một bưu điện tính tiền sử dụng điện thoại cho khách hàng theo công thức:

Tiền thanh toán=đơn giá * số phút + thuê bao

Hãy viết chương trình theo yêu càu sau:

- Nhập họ tên, địa chỉ khách hàng, đơn giá, số phút sử dụng

- Tính và in ra màn hình số tiền khách hàng phải trả. Biết tiền thuê bao là 30000

Viết chương trình tính giá trị của biểu thức A=2x²-3xy+7y². Biết 2 số x, y nhập từ bàn phím

Mai e kiểm tra rồi. Thank trước ạ

Cho a bằng 9 b bằng 8 .tìm kết quả của biến s sau mỗi câu lệnh sau đây, với với ban đầu giá trị của s bằng 0

a) if (a+b) mod 2=0 then s:=b else s:=a;

Hãy xác định kết quả của các phép so sánh sau đây:
a. 15 - 8 ≥ 3
b. (20 - 15)2 ≠ 25
c. 112 = 121
d. x > 10 - 3x
Viết các biểu thức bằng các kí hiệu pascal

Nhập n nguyên.

Kiểm tra xem n có phải là số nguyên tố không?

Viết ct khai báo biến mảng nhập số N nhập giá trị, tính tổng các số lớn hơn 10 có trong dãy in kết quả

Hưỡng dẫn

Var I, n: integer;

A:array [1.. 100] of integer;

For i:= 1 to n do

Tổng=0

For i:= 1 to n do

If m[i] >10 then

Tổng:= tong + m[i]

For i:= 1 to n do