uses crt;

var n,i,x:integer;

begin

writeln('Nhap so: ');readln(n);

For i:=1 to 9 do writeln(n,'x',i,'=',n*i);

readln

end.

là ví dụ nhập vào 22334 và 8993 thì in ra 22334 tổng là 14; 8993 có tổng là 29; à?

nếu vậy chỉ cần cho chạy vòng mod, div 10 rồi cộng dồn là ra kết quả:

vd  for i:=1 to length(a) do begin

sa:=a mod 10;

a:=a div 10; end;

b tương tự kiểu vậy là được :) 

program (tự việt nhé)

begin

a:=14;

writeln('Bang cuu chuong 14');readln;

for i:=1 to 10 do begin

writeln(a*i); delay(1000);

end;

readln;

end.

tải anh về rồi ấn vào thông tin tài khoản rồi ấn vào đổi ảnh hiển thị là xong mà muốn lưu ảnh phải ấn Ctrl + f5 .

? Ý mik là up ảnh lên phần câu hỏi ?
còn đổi ảnh thì mik biết rôi

sau khi đổi bn phải 1 tay giữ phím shift 1 tay bấm f5

khi chọn ảnh xong rồi ý

ctrl hay shift đều đc

chọn Anime hoặc Doraemon rồi lưa lại rồi đổi ảnh hiện thị .

LÀ SAO RÕ HƠN ĐC KO

1 vô thông tin tài khoản 

2  nhấp vô đổi ảnh hiển thị 

3 chọn ảnh 

Ko có gì đâu lúc đầu mik cũng như bn mà

Câu 1: Trong câu lệnh lặp For i :=1 to 10 do begin .... end ; câu lệnh ghép được bao nhiêu lần ?

A. 20 lần              B. 1 lần               C. 2 lần                       D. 10 lần 

Câu 2: Tìm giá trị của S trong đoạn chương trình dưới đây ?

                S :=1 ; 

                For i: = 1 to 5 do S := S*i 

A. S = 120                   B. S = 240                       C. S = 24                    D. S = 10 

Câu 3: Tìm giá trị của S trong đoạn chương trình dưới đây ?

              S :=1 : 

              For i:= 1 to 5 do S := S + 1

A. S = 10                     B. S = 16                     C. S = 18                    D. S = 14 

Câu 4: Câu lệnh for i: 1 to 10  do writeln ('A') ; không hợp lệ vì 

A. Giá trị đầu cuối không hợp lệ                                 B. Thiếu dấu = ở phép gán giá trị cho biến 

C. Thừa dấu : ở phép gán giá trị cho biến                  D. Không có đáp án nào đúng 

Câu 5: Trong câu lệnh lặp For .... to ....do của Pascal , trong mỗi vòng lặp , biến đếm thay đổi thay đổi như thế nào ? 

A. + 1                        B. + 1 hoặc - 1                   C. Một giá trị bất kì