Viết chương trình nhập vào 2 số nguyên dương A,B (1≤A<B≤1000) từ bàn phím. Tính tổng các số lẻ trong đoạn từ A đến B và tìm phân số tối giản của phân số A/B?? Giúp với ạ Em sẽ đánh giá 5 sao cho những ai trả lời

uses crt; var a,b,t,i:longint; function tong(a,b:longint):longint; begin for i:=a to b do if i mod 2=1 then inc(t,i); writeln('Tong cac so le: ',t); end; function toigian(a,b:longint):longint; begin for i:=1 to a do if (a mod i=0)and(b mod i=0) then t:=i; writeln(a div t,'/',b div t); end; begin clrscr; write('a,b= ');readln(a,b); tong(a,b); toigian(a,b); readln end.

Viết chương trình nhập vào 2 số nguyên dương A,B (1≤A
30/07/2021 Bởi Kaylee

Viết chương trình nhập vào 2 số nguyên dương A,B (1≤A { "@context": "https://schema.org", "@type": "QAPage", "mainEntity": { "@type": "Question", "name": " Viết chương trình nhập vào 2 số nguyên dương A,B (1≤ABình luận

Viết một bình luận Hủy