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ố đó
1 câu trả lời
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.
Câu hỏi trong lớp
Xem thêm
