cho dãy A gồm các số a,b,c,d là các số nguyên dương. hãy viết chương trình tìm giá trị nhỏ nhất trong dãy số đó
0 bình luận về “cho dãy A gồm các số a,b,c,d là các số nguyên dương. hãy viết chương trình tìm giá trị nhỏ nhất trong dãy số đó”
uses crt; var d,a,b,i:longint; begin clrscr; write(‘a,b=’);readln(a,b); if a mod 10=0 then write(a,’ ‘); if b mod 10=0 then write(b); writeln; for i:=a to b do inc(d,i); writeln(d); readln end.
uses crt;
var d,a,b,i:longint;
begin
clrscr;
write(‘a,b=’);readln(a,b);
if a mod 10=0 then write(a,’ ‘);
if b mod 10=0 then write(b); writeln;
for i:=a to b do inc(d,i);
writeln(d);
readln
end.