25 ! 4)сколько раз будет выполнен этот цикл? i: =2; while i< 5 do begin writeln('! '); i: =i+1; end; 5)какое число нужно написать вместо многоточия, чтобы цикл выполнился ровно 2 раза? i: =; while i> =6 do begin writeln('! '); i: =i-1; end; 6)чему будет равно значение переменной «a» после выполнения этого цикла? i: =3; a: =12; while i< 3 do begin a: =a+i; i: =i+1; end; 7)сколько строк напечатает программа: var k,l: integer; begin k: =8; while k> 0 do begin l: =10; while l< 15 do begin writeln('мне нравится паскаль.'); l: =l+1; end; k: =k-1; end; end.
5) 7
6) 40 раз