1) определите значение переменной s после выполнения следующего фрагмента программы: s: =5; i: =14; while i > 1 do begin s : = s + i div 2; i : = i - 1; end; 2) определите, что будет напечатано в результате работы следующего фрагмента программы: var k, s: integer; begin s: =0; k: =1; while s < 66 do begin k: =k+3; s: =s+k; end; write(k); end. 3) определите, что будет напечатано в результате работы следующего фрагмента программы: var k, s: integer; begin s: =5; k: =0; while k < 15 do begin k: =k+2; s: =s+k; end; write(s); end. 4) за¬пи¬ши¬те зна¬че¬ние пе¬ре¬мен¬ной s, по¬лу¬чен¬ное в ре¬зуль¬та¬те ра¬бо¬ты сле¬ду¬ю¬щей про¬грам¬мы. текст про-грам¬мы при¬ведён на трёх язы¬ках про¬грам¬ми¬ро¬ва¬ния. а) б) var s,k: integer; begin s : = 0; for k : = 3 to 8 do s : = s + 6; writeln(s); end. var s,k: integer; begin s : = 0; for k : = 8 to 12 do s : = s + 12; writeln(s); end.

Ganshit    2   20.07.2019 12:50    0