Đọc từ tệp “INPUT.TXT” 2 số nguyên A và B (A

Đọc từ tệp “INPUT.TXT” 2 số nguyên A và B (A { "@context": "https://schema.org", "@type": "QAPage", "mainEntity": { "@type": "Question", "name": " Đọc từ tệp 'INPUT.TXT' 2 số nguyên A và B (A

0 bình luận về “Đọc từ tệp “INPUT.TXT” 2 số nguyên A và B (A<B) tính tổng các số chia hết cho 3 trong phạm vi từ A đến B. Ghi kết quả ra tệp "OUTPUT.TXT" Giúp mk vs ạ”

  1. uses crt;
    var d:text; a,b,i,tong:longint;
    begin
    clrscr;
       assign(d,’input.txt’);reset(d);
           readln(d,a,b);
       close(d);
       assign(d,’output.txt’);rewrite(d);
          for i:=a to b do
             if i mod 3=0 then inc(tong,i);
          writeln(d,tong);
       close(d);
    end.

    Bình luận
  2. #include <iostream>
    #include <fstream>
    using namespace std;
    int main()
    {
        int a,b;
        ifstream inp(“INPUT.TXT”);
        ofstream out(“OUTPUT.TXT”);
        inp>>a>>b;
        for(;a<=b;a++){
            if(a%3==0){
                out<<a<<” “;
            }
        }
        inp.close();
        out.close();
        //samon247
        return 0;
    }

    Bình luận

Viết một bình luận