Составить программу для нахождения суммы последовательности чисел произвольного диапазона(паскаль)

Halimali10 Halimali10    3   20.05.2019 14:40    0

Ответы
RomanovDanya201DAnua RomanovDanya201DAnua  14.06.2020 00:52

program NT;

var  i, s, n:integer;

begin

writeln('vvedi n');

readln(n);

s:=0;

for i:=1 to n do begin x:=-10+random(200); s:=s+x; end;

writeln('s=',s);

end.

 

 

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика