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) sẽ trờ thành bảng nhân N:có các nhân tử từ 1 đến 100
c)
Nhân từ 10 đến 100
Em cũng làm được cái này nhưng hai câu nó không xuống dòng mà nó cứ ra liên tiếp. Giúp e với
1. Program Tinh tien;
2. Uses crt
3. Var soluong,dongia,Tienthanhtoan:=integer;
4. Const Phi=1000;
5. Begin
6. Clrscr;
7. write('nhap so luong:');readln(soluong);
8. write('nhap don gia:');readln(dongia);
9. Tienthanhtoan:= soluong*dongia+phi;
10. writeln('So tien quy khach phai thanh toan la:',Tienthanhtoan);
11. Readln;
12. End.
1. Program Tinh_tien;
2. Uses crt;
3. Var soluong,dongia,Tienthanhtoan:=integer;
4. Const Phi=1000;
5. Begin
6. Clrscr;
7. write('nhap so luong:');readln(soluong);
8. write('nhap don gia:');readln(dongia);
9. Tienthanhtoan:= soluong*dongia+phi;
10. writeln('So tien quy khach phai thanh toan la:',Tienthanhtoan);
11. readln;
12. end.
1:
a) Sai
b) Sai
c) đúng
d) sai
2:
câu lệnh lặp 6 lần
giá trị của s là 12
(2) write(‘hay nhap so hoc sinh trong lop :’);
(1) readln(N);
(3) write(‘nhap chieu cao cua tung ban tinh theo m’);
(6) for i:=1 to N do
(4) begin
(7) read (a[I]);
(8) write (a’[‘,i,’]=')
(5) end;
7-8-6-9-5-3-4-1-2