Website and domain for sale: mail@discussmain.com

# Computer science the 9th class, a cycle with a post-condition (repeat).№1. The sequence of integers which sign of the termination - 0 is given. Nayti quantity of negative elements of the sequence, multiple 7.№2. Preparing for competitions, the skier in the first day ran 10 km., then every day increased distance by 10% of previous day. For what day of trainings it will run more To km.? Please consider please repeat operator

329
Var A, k: integer; Begin k: = 0; Repeat ReadLn (A); if (A< 0) and (A mod 7 = 0) then k: = k+1; Until A = 0; WriteLn (k =, k); End. If means when the number of the kilometers passed in a day exceeds K, then here: Var A, K, n: real; Begin Write (K =); ReadLn(K); A: = 10; n: = 0; Repeat n: = n+1; A: = A*1. 1 Until A> K; WriteLn(n) End. If means when the total number of the passable kilometers exceeds K, then here: Var A, K, n, S: real; Begin Write (K =); ReadLn(K); A: = 10; n: = 0; S: = A; Repeat n: = n+1; A: = A*1. 1; S: = S+A; Until S> K; WriteLn(n) End.
396