даны натуральные числа m и n (m<n).
составить программу, печатающую все натуральные числа больше m, но меньше n, а также сумму этих чисел.
в программе Паскаль
составить программу, печатающую все натуральные числа больше m, но меньше n, а также сумму этих чисел.
в программе Паскаль
Answers & Comments
Verified answer
Var m,n,i,s:integer;begin
write('m = ');
readln(m);
write('n = ');
readln(n);
s:=0;
for i:=m+1 to n-1 do
begin
write(i,' ');
s:=s+i;
end;
writeln;
writeln('s = ',s);
end.
Пример:
m = 5
n = 10
6 7 8 9
s = 30