1) определите значение переменной s после выполнения следующего фрагмента программы: s: =5; i: =14; - id519315820210119 от Kajdit 19.01.2021 02:54

Question

Информатика: 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:

Kajdit · Accepted Answer

Var     N, s, i: Integer;     s1: real; begin     readln(N); {общий ввод для всех задач}          if N 0 then         writeln( Задача 1. N= , 0)     else writeln( Задача 1. N= , N + 4);          s := 0;     for i := 1 to n do         s := s + i;     writeln( Задача 7. 1+2+3+…+N= , s);          write( Задача 9. Последовательность от N до 1 = );     for i := n downto 1 do         write(i, );     writeln();          s1 := 0;     for i := 1 to n do         s1 := s1 + i / 10;     writeln( Задача 12....

MOGZ ответил