Viết chương trình đọc các số nguyên từ tệp nhập txt tính tổng các số chẵn và ghi kết quả ra màn hình
Show Khách Hãy nhập câu hỏi của bạn vào đây
Những câu hỏi liên quan
Bạn sử dụng tạo đoạn video trên Youtube? (Tin học - Lớp 3) 1 trả lời Tìm x X2−4+(x−2)(3−2x)=0 (Tin học - Lớp 8) 4 trả lời Chọn đáp án đúng nhất (Tin học - Lớp 4) 2 trả lời
Var f1, f2: text; Tong, m, n, i: integer;Begin assign(f1, ‘DULIEU.TXT’); reset(f1); assign(f2, ‘KETQUA’); rewrite(f2); Tong;= 0; read(f1, m, n); for i:= m to n do if i mod 2 = 0 then Tong:= Tong+i; write(f2, Tong); close(f1); close(f2);End.CÂU HỎI HOT CÙNG CHỦ ĐỀ
Trong PASCAL, để khai báo hai biến tệp văn bản f1, f2 ta viết: Xem đáp án » 19/06/2021 13,131
Để biết con trỏ tệp đã ở cuối dòng của tệp f hay chưa, ta sử dụng hàm: Xem đáp án » 19/06/2021 3,464
Để gắn tệp KQ.TXT cho biến tệp f2 ta sử dụng câu lệnh: Xem đáp án » 19/06/2021 2,595
Cho xâu kí tự sau: s:= ‘Truyen Kieu-Nguyen Du’ Lệnh nào sau đây cho kết quả ‘Truyen Kieu’ Xem đáp án » 19/06/2021 2,458
Muốn khai báo x, y là tham số biến (x, y thuộc kiểu integer) trong thủ tục có tên là “Hoan_doi” thì khai báo nào sau đây là đúng: Xem đáp án » 19/06/2021 2,311
Cho s = ‘ABCDEF’, hàm copy (s, 2, 3) cho giá trị là: Xem đáp án » 19/06/2021 2,146
Để phân biệt giữa tham biến và tham trị, trước tham biến người ta dùng từ khoá: Xem đáp án » 19/06/2021 2,030
Khai báo 2 biến xâu a, b nào sau đây là đúng: Xem đáp án » 19/06/2021 1,343
Cho chương trình sau: procedure thutuc (a, b: integer); Begin … End; Trong chương trình chính có thể gọi lại chương trình con như thế nào Xem đáp án » 19/06/2021 1,215
Cho đoạn chương trình sau: s1 := ‘123d’; s2 := ‘abcd’; delete(s1, 1, 3); write(pos (s1, s2)); Kết quả in ra màn hình là: Xem đáp án » 19/06/2021 926
Cho đoạn chương trình sau: s1 := ‘abcd’; s2: ‘abab’; if length(s1) > length(s2) then write(s1) else write(s2); Kết quả in ra màn hình là: Xem đáp án » 19/06/2021 894
Các biến được khai báo dùng riêng cho chương trình con được gọi là: Xem đáp án » 19/06/2021 886
Cho đoạn chương trình sau: s1 := ‘bbaa’; s2: ‘abcd’; if s1 > s2 then write(s1) else write(s2); Kết quả in ra màn hình là: Xem đáp án » 19/06/2021 767
Câu lệnh mở biến tệp f1 để đọc dữ liệu có dạng: Xem đáp án » 19/06/2021 744
Tệp f1 có dữ liệu để đọc 3 giá trị trên tương ứng với 3 biến x, y, z ta sử dụng câu lệnh: Xem đáp án » 19/06/2021 635
cho tệp so.txt gồm các số nguyên viết chương trình đọc dữ liệu từ tệp so.txt và in ra màn hình các số chẵn Các câu hỏi tương tự |