Begin s 3. Var s,k: integer; begin s :. Var s k integer begin s 1 for k 3 to 0 do s s*3. K 1 for i 1 to 5 do begin writeln k*k , ' '. Var s k integer begin s 2 for k 7. Оператор ветвления в Паскале. Задачи в Pascal на ветвление. Полное ветвление Паскаль