Даны натуральные числа m и n (m<n).составить программу, печатающую все натуральные числа...

0 голосов
23 просмотров

Даны натуральные числа m и n (mсоставить программу, печатающую все натуральные числа больше m, но меньше n, а также сумму этих чисел.
в программе Паскаль


Информатика (253 баллов) | 23 просмотров
0

спасибо за ответ!

0

очень помогли

0

нет

Дан 1 ответ
0 голосов
Правильный ответ

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

(194k баллов)