george39

16.06.2022 10:24 •  Информатика

нужно найти конечное значение s
а) s:=0; n:=10; For i:=2 To n Do s:=s+100 div i; б) s:=0; for i:=-5 to 0 do n:=i*i; s:=s+n;
в) n:=5; s:=0; for i:=1 to n do s:=i; writeln(s);
г) for i:=1 to 5 do for j:=1 to 5 do write(‘x’);