Определить результат выполнения программs K:=0 for x:=1 to 2 do for i:=1 to 3 do if x=i then for j:= 1 to 3 do k:=k+1 writeln ('k =', k)
Вот программа ,ответ 6
эта программа не к этой задаче....
Извините)
исправил
а где исправленая задача?
Файлик
прикреплен
а решение можно??